X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fparse-lambda-list.lisp;h=7f60223f26fea39780baf93adbe85d48e0761631;hb=43b1750ede8767928788b158399d3c5d2910855a;hp=64e5838c2423829e0a896f065c57282dea434732;hpb=9ca04e5fe7bc37286c120bc84cfd4abf05e51327;p=sbcl.git

diff --git a/src/compiler/parse-lambda-list.lisp b/src/compiler/parse-lambda-list.lisp
index 64e5838..7f60223 100644
--- a/src/compiler/parse-lambda-list.lisp
+++ b/src/compiler/parse-lambda-list.lisp
@@ -105,10 +105,12 @@
                (setq auxp t
                      state :aux))
               (t
-               ;; It could be argued that &WHOLE and friends would be just ordinary
-               ;; variables in an ordinary lambda-list, but since (1) it seem exceedingly
-               ;; unlikely that that was that the programmer actually ment (2) the spec
-               ;; can be interpreted as giving as licence to signal an error[*] we do.
+               ;; It could be argued that &WHOLE and friends would be
+               ;; just ordinary variables in an ordinary lambda-list,
+               ;; but since (1) that seem exceedingly to have been the
+               ;; programmers intent and (2) the spec can be
+               ;; interpreted as giving as licence to signal an
+               ;; error[*] that is what we do.
                ;;
                ;; [* All lambda list keywords used in the
                ;; implementation appear in LAMBDA-LIST-KEYWORDS. Each