Commit 42718e40 authored by ehuelsmann@1c010e3e-69d0-11dd-93a8-456734b0d56f's avatar ehuelsmann@1c010e3e-69d0-11dd-93a8-456734b0d56f
Browse files

Fix #163: Local functions should shadow global macro and function bindings.

parent a762bd0d
......@@ -1228,6 +1228,11 @@ where each of the vars returned is a list with these elements:
((symbolp op)
(when (find-local-function op)
;; local functions shadow macros and functions in
;; the global environment as well as compiler macros
(return-from p1
(p1-function-call form)))
(when (compiler-macro-function op)
(unless (notinline-p op)
(multiple-value-bind (expansion expanded-p)
Markdown is supported
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