5 lines
99 B
Forth
5 lines
99 B
Forth
|
: divideCheck(n)
|
||
|
|
| e |
|
||
|
|
try: e [ 128 n / ] when: [ "Zero detected..." . ]
|
||
|
|
"Leaving" println ;
|