Find limit of recursion is part of Short Circuit's Console Program Basics selection.
Task

Find the limit of recursion.




: munge ( n -- n' ) 1+ recurse ;
 
: test   0 ['] munge catch if ." Recursion limit at depth " . then ;
 
test   \ Default gforth: Recursion limit at depth 3817