X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fearly-defstructs.lisp;h=f7a67a7e05fe3fa030c67be8b0365a584d9cdeb0;hb=1540c1c1d517c58fa9a41629beb65cdce7dfafb6;hp=2883fbd583840bd62c5aa7a8fb32b88f9951f5d4;hpb=4eb1a6d3ad2b7dcc19ac0ec979a1eb1eb049659a;p=sbcl.git diff --git a/src/code/early-defstructs.lisp b/src/code/early-defstructs.lisp index 2883fbd..f7a67a7 100644 --- a/src/code/early-defstructs.lisp +++ b/src/code/early-defstructs.lisp @@ -15,7 +15,7 @@ #.`(progn ,@(mapcar (lambda (args) - `(defstruct ,@args)) - (sb-cold:read-from-file "src/code/early-defstruct-args.lisp-expr"))) + `(defstruct ,@args)) + (sb-cold:read-from-file "src/code/early-defstruct-args.lisp-expr"))) (/show0 "done with early-defstructs.lisp")