OpenEuphoria

Re: EU 3.0.1 -- there's probably a bug in there somewhere

• Posted by Kenneth Rhodes <ken_rhodes30436 at yahoo.com> Feb 02, 2007
• 648 views

Matt Lewis wrote:
> 
> Andy Serpa wrote:
> > 
> > 
> > Ok, I got it.  Recursion does cause the problem.  Get yourself a copy of
> > kanarie
> > v1.8b and try this:
> > 
> > [I'm using exw.exe here on an Athlon XP Pro system, btw.]
> > 
> 
> Here's some simpler code that causes a crash.  However, after rebuilding
> from source, I wasn't getting the crash (with the vanilla rds source, nor
> with ooeu source).  Also, the traceback only goes to 100 levels before it 
> quits...and looking at the source, I see:
> 
> #define MAX_TRACEBACK 100 /* maximum number of levels of traceback to show */
> 
> However, I suspect that it's not checking entirely correctly very well to 
> make sure we don't go past this (I don't think this was an issue with
> Andy's stuff, since he didn't go as deep).
> 

Doesn't crash on my system...

-- 3.01 crash test
puts(1, "Starting\n")
integer count
count = 0
procedure recurse(integer r )
 	count += 1
 	if r = 0 then
 		? count
 		return
 	else
 		recurse( r - 1 )
 	end if
 end procedure
 
 recurse( 12000 )
 
 puts(1,"Done\n")
 if getc(0) then
 	
 end if
 

ken@linux:~/euprogs> exu crash.ex
Starting
12001
Done

Ken Rhodes
Folding at Home: http://folding.stanford.edu/
100% MicroSoft Free
SuSE Linux 10.0
No AdWare, SpyWare, or Viruses!
Life is Good,