sd:star_forth_test_suite
Differences
This shows you the differences between two versions of the page.
| Both sides previous revisionPrevious revision | |||
| sd:star_forth_test_suite [2026/03/14 06:22] – appledog | sd:star_forth_test_suite [2026/03/14 13:20] (current) – appledog | ||
|---|---|---|---|
| Line 146: | Line 146: | ||
| === FIZZBENCH | === FIZZBENCH | ||
| <codify Forth> | <codify Forth> | ||
| + | : FIZZBUZZ 21 1 DO I 15 MOD 0 = IF ." FizzBuzz" | ||
| + | 0 = IF ." Fizz" ELSE I 5 MOD | ||
| + | 0 = IF ." Buzz" ELSE I . THEN THEN THEN CR LOOP ; | ||
| : FIZZBENCH 0 10000 0 | : FIZZBENCH 0 10000 0 | ||
| DO I 15 MOD 0 = IF 1 + ELSE | DO I 15 MOD 0 = IF 1 + ELSE | ||
sd/star_forth_test_suite.txt · Last modified: by appledog