[armedbear-ticket] [armedbear] #292: Large generated functions problems

13 Jan 2013

      #292: Large generated functions problems
-----------------------+----------------------------------------------------
 Reporter:  sboukarev  |       Owner:  ehuelsmann
     Type:  defect     |      Status:  new       
 Priority:  major      |   Milestone:            
Component:  compiler   |     Version:            
 Keywords:             |  
-----------------------+----------------------------------------------------
 Some components of f2cl, which are generated from Fortran, have functions
 with lots of code in it.

 If there's too much code between go and a label, ABCL can't compile it.

 {{{
 (defmacro labels-galore (n)
   `(prog ()
       (go label1)
     label2
       ,@(loop for i to n
               collect `(print ,i) )
       (return)
     label1
       (go label2)))

 (defun test ()
   (labels-galore 10000))
 }}}

 The assertion (<= -32768 JVM::OFFSET 32767) failed.

 Increasing the number will eventually lead to a stack overflow.

 Just a large body:

 {{{
 (defmacro large-body (n)
   `(progn
       ,@(loop for i to n
               collect `(print ,i))))

 (defun test ()
   (large-body 10000))
 }}}

 The assertion (< 0 (LENGTH JVM::C) 65536) failed.

-- 
Ticket URL: <http://trac.common-lisp.net/armedbear/ticket/292>
armedbear <http://common-lisp.net/project/armedbear>
armedbear