Loading definers.lisp +2 −0 Original line number Diff line number Diff line Loading @@ -299,6 +299,8 @@ like #'eq and 'eq." (progn (push el inner-arguments/macro-body) (push `(quote ,el) inner-arguments/fn-body)))) (reversef inner-arguments/macro-body) (reversef inner-arguments/fn-body) (bind () (dolist (arg args-to-remove-from-fn) (removef fn-args arg)) Loading Loading
definers.lisp +2 −0 Original line number Diff line number Diff line Loading @@ -299,6 +299,8 @@ like #'eq and 'eq." (progn (push el inner-arguments/macro-body) (push `(quote ,el) inner-arguments/fn-body)))) (reversef inner-arguments/macro-body) (reversef inner-arguments/fn-body) (bind () (dolist (arg args-to-remove-from-fn) (removef fn-args arg)) Loading