(compiler-error "multiple &AUX in lambda list: ~S" list))
(setq auxp t
state :aux))
- (t
+ (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
+ ;; 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.
;;
;; [* All lambda list keywords used in the
(multiple-value-bind (required optional restp rest keyp keys allowp auxp aux
morep more-context more-count)
(parse-lambda-list-like-thing lambda-list)
-
+
;; Check validity of parameters.
(flet ((need-symbol (x why)
(unless (symbolp x)