X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fpackage.lisp;h=2bb677ffba0a371210fe8d6b87848f0bda5adee8;hb=a01e7ac2e8a9f3afae8f759381a0829fceb5bfde;hp=e8aeb85a762ba653eae839b8a1ed1b638d64f0cb;hpb=a9d113c53175ab3215697f7cf6ab6b7c1f448d5a;p=sbcl.git diff --git a/src/code/package.lisp b/src/code/package.lisp index e8aeb85..2bb677f 100644 --- a/src/code/package.lisp +++ b/src/code/package.lisp @@ -208,9 +208,9 @@ &body body) #!+sb-doc "Within the lexical scope of the body forms, MNAME is defined via macrolet - such that successive invocations of (MNAME) will return the symbols, - one by one, from the packages in PACKAGE-LIST. SYMBOL-TYPES may be - any of :INHERITED :EXTERNAL :INTERNAL." +such that successive invocations of (MNAME) will return the symbols, one by +one, from the packages in PACKAGE-LIST. SYMBOL-TYPES may be any +of :INHERITED :EXTERNAL :INTERNAL." (let* ((packages (gensym)) (these-packages (gensym)) (ordered-types (let ((res nil))