This website requires JavaScript.
Explore
lain.church
Help
Register
Sign In
izaya
/
collapseos
Watch
1
Star
1
Fork
0
You've already forked collapseos
Code
Issues
Pull Requests
Releases
Wiki
Activity
3d908cef3a
collapseos
/
blk
/
407
11 lines
153 B
Plaintext
Raw
Normal View
History
Unescape
Escape
Move all parsing words to Inner core This allows us to get rid of the (parse*) indirection.
2020-05-02 21:21:47 -04:00
: SCPY
BEGIN ( a )
DUP C@ ( a c )
DUP C, ( a c )
NOT IF DROP EXIT THEN
1+ ( a+1 )
AGAIN
;
Reference in New Issue
Copy Permalink