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

* src/compiler/eval-comp.lisp (compile-for-eval): Delete

	unreachable blocks, similar to ir1-optimize, which we don't call.
	This simplifies things by reducing the differences between
	"normal" compilation and compiling for interpretation.

	* src/compiler/ir1util.lisp (block-unreachable-p): New function.
	(delete-lambda): Mark return blocks for deletion again.

	* src/compiler/ir1opt.lisp (ir1-optimize): Use block-unreachable-p.
	Delete unreachable blocks after the loop.
parent 6e3efcdb
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