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

[cmucl]

#25: Compiler bug
---------------------+------------------------------------------------------
  Reporter:  rtoy    |       Owner:  somebody
      Type:  defect  |      Status:  new     
  Priority:  major   |   Milestone:          
 Component:  Core    |     Version:  2008-11 
Resolution:          |    Keywords:  compiler
---------------------+------------------------------------------------------

Comment(by rtoy):

 Replying to [comment:1 rtoy]:

 Correction:
 {{{
 (declaim (optimize (safety 3)))

 (defun foo2 ()
   (catch (make-symbol "CMUCL-DEBUG-CATCH-TAG")
     (make-string 49)))
 }}}

 There's no problem if safety < 3.

-- 
Ticket URL: <http://127.0.0.1:8000/cmucl/ticket/25#comment:2>
cmucl <http://common-lisp.net/project/cmucl>
cmucl