Commit a001e07a authored by Attila Lendvai's avatar Attila Lendvai
Browse files

fix: in parse-ordinary-lambda-list normalize &aux specifications as promised in the docs

parent 979f7916
......@@ -193,7 +193,9 @@ Signals a PROGRAM-ERROR is the lambda-list is malformed."
(destructuring-bind (var &optional init) elt
(declare (ignore init))
(check-variable var "&aux parameter"))
(check-variable elt "&aux parameter"))
(progn
(check-variable elt "&aux parameter")
(setf elt (list elt nil))))
(push elt aux))
(t
(simple-program-error "Invalid ordinary lambda-list:~% ~S" lambda-list)))))))
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment