1
0
mirror of https://github.com/hsoft/collapseos.git synced 2024-12-26 05:58:05 +11:00
collapseos/blk/405
Virgil Dupras 052d59a3a2 TOWORD: tiny optimization
My mind is getting forthy.
2020-05-13 20:59:00 -04:00

4 lines
69 B
Plaintext

: WS? 33 < ;
: TOWORD 0 ( dummy ) BEGIN DROP C< DUP WS? NOT UNTIL ;