My test machine crashes on level 34 in my test.

The code below prevents the crash.  No error is shown because of the catch
statement.

proc x {} {
   if {[info level] > 30} {
        error "recursion level > 30 in [info level [info level]]"
  }
   ns_write [info level]
   catch {
     x
   }
 }

On Wednesday 16 January 2002 10:11 am, you wrote:
> Don't do that!  You have an infinite recursion here.  You need to include
> some condition in the code which will stop the recursive calls to "x" at
> some point (preferably before 50 levels of recursion).
>
> On 1/16/02 12:08 PM, "Chiriac Petrica Clement" <[EMAIL PROTECTED]> wrote:
> > This code produce "Segmentation fault"
> >
> > proc x {} {
> >   puts [info level]
> >   catch {
> >     x
> >   }
> > }

Reply via email to