Skip to content
Snippets Groups Projects
Commit 05271223 authored by gerd's avatar gerd
Browse files

(compile nil '(lambda (c)

	                (flet ((%f16 () (setq c 1)))
	                  (+ (%f16) (%f16)))))
	 => assertion failure, c not found in environment

	Found by Paul Dietz (similar cases).

	* src/compiler/envanal.lisp (compute-closure): Don't close
	over unused variables from sets.  Not really a port from
	SBCL because I needed to debug this to the point where the
	cause was clear; SBCL does the same though.
parent 58c6aaf8
No related branches found
No related tags found
No related merge requests found
Loading
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