[cmucl-ticket] [cmucl] #25: Compiler bug

#25: Compiler bug ----------------------+----------------------------------------------------- Reporter: rtoy | Owner: somebody Type: defect | Status: new Priority: major | Milestone: Component: Core | Version: 2008-11 Keywords: compiler | ----------------------+----------------------------------------------------- Reported on cmucl-imp, 2008-10-31

{{{ (declaim (optimize (speed 0) (safety 3) (debug 3)))

(defun test-pop-and-return () (loop (pop *random-stack*) (return))) }}}

When compiled, this causes an internal compiler error from {{{STACK- ANALYZE}}}.

The error happens because {{{NODE-PREV}}} returns {{{NIL}}} instead of a node.