Skip to content
Snippets Groups Projects
Commit 977b95a1 authored by ram's avatar ram
Browse files

Changed environment-macro to return the original "LAMBDA" rather than

in interpreted function.  In discovering this fix, I found out that
PCL isn't "really" using the environment at all, but is rather
making a bogus "macro" entry in the environment that isn't a lambda
at all, but rather a representation of what it thinks is in the
environment.  My change to make the environment representation correct
doesn't hurt anything, but is actually irrelevent to PCL's usage.
parent c9ac108f
No related branches found
No related tags found
No related merge requests found
...@@ -853,7 +853,7 @@ ...@@ -853,7 +853,7 @@
(let ((entry (assoc macro (c::lexenv-functions env) :test #'eq))) (let ((entry (assoc macro (c::lexenv-functions env) :test #'eq)))
(and entry (and entry
(eq (cadr entry) 'c::macro) (eq (cadr entry) 'c::macro)
(cddr entry))))) (function-lambda-expression (cddr entry))))))
); end of #+:CMU ); end of #+:CMU
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment