diff options
| author | Igor Pashev <pashev.igor@gmail.com> | 2022-11-13 12:18:38 +0200 |
|---|---|---|
| committer | Igor Pashev <pashev.igor@gmail.com> | 2022-11-13 12:59:19 +0200 |
| commit | 835006eb03caeae86ef84d094f5b878cf16aad47 (patch) | |
| tree | 544a0d07bb4eae1e08bc5e71eef6b61eae892dc6 | |
| parent | 82941c076d5f8d026544158cae438dc2764cb2de (diff) | |
| download | gcd-835006eb03caeae86ef84d094f5b878cf16aad47.tar.gz | |
Update Forth
No crash on empty list.
| -rw-r--r-- | gcd.fs | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -30,7 +30,8 @@ r> 1 + >r repeat 2drop - r> gcdn . cr + r> + dup 0 <> if gcdn . cr else drop endif ; main bye |