[gambit-list] non-tail recursion segfaults

Bradley Lucier lucier at math.purdue.edu
Mon Apr 2 11:00:56 EDT 2007


I get no problems here:

> euler-70% vi crap.scm
> euler-71% gsc crap
> euler-72% gsi crap
> euler-73% gsi
> Gambit Version 4.0 beta 20
>
> > (load "crap")
> "/export/users/lucier/crap.o1"
> >
> *** EOF again to exit
> euler-74% cat crap.scm
> (define (loop i)
>    (if (zero? i)
>        '()
>        (cons i (loop (- i 1)))))
>
> (loop 20000)


Do you have (declare (not interrupts-enabled))?  If so, it will crash  
if you overflow the stack.

Brad



More information about the Gambit-list mailing list