#154: COMPILE-FILE-2 ansi compiled fails -----------------------------------------------+---------------------------- Reporter: mevenson | Owner: ehuelsmann Type: defect | Status: new Priority: blocker | Milestone: 0.26 Component: compiler | Version: Keywords: compiler ansi-compiled regression | -----------------------------------------------+----------------------------
Comment(by mevenson):
Definitely caused by r13305.
To reproduce externally from the ANSI tests, save the following form as say 'compile-file-tet-file-2.lisp':
{{{ (defun compile-file-test-fun.2 () nil)
(eval-when (:compile-toplevel) (unless (find-class 'compile-file-test-condition.2 nil) (define-condition compile-file-test-condition.2 (style-warning) nil)) (warn (make-condition 'compile-file-test-condition.2))) }}}
And then
{{{ CL-USER> (compile-file "compile-file-tet-file-2.lisp") }}}
will produce the stack overflow.