Skip to content
Snippets Groups Projects
Commit 94259938 authored by Raymond Toy's avatar Raymond Toy
Browse files

Don't try to get the lambda-expression for a function

Since we're just going to return the original compiled function,
there's no point in trying to get the function-lambda-expression of
the function.  So, if we're given a function, just return the
(default) definition.
parent ae93b43b
No related branches found
No related tags found
No related merge requests found
......@@ -2041,11 +2041,7 @@
((or cons eval:interpreted-function)
`#',(get-lambda-to-compile definition))
(function
(multiple-value-bind (exp lexenv)
(function-lambda-expression definition)
(if (and exp (not lexenv))
`#',exp
definition)))))
definition)))
(*source-info* (make-lisp-source-info form))
(*top-level-lambdas* ())
(*converting-for-interpreter* nil)
......
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