Open larsbrinkhoff opened 9 years ago
This runs in 1.4 seconds in the current x86 target, and seconds and 2.5 seconds in gforth-fast.
100000000 constant loops
: test begin ?dup if 1 - else exit then again ;
loops test
By the way, 140 seconds in the C target. Phew!
See e.g. https://groups.google.com/d/msg/comp.lang.forth/YVjtNQwSIH0/YHduzDG4c9EJ