blob: 310728c0712469575bbd659a5b1d04715abae001 [file] [log] [blame]
#
# RECURSE test
#
FORWARD success;
FORWARD failure;
: recurser 100 = IF 1 + RECURSE;
: MAIN 1 recurser success ;