This website requires JavaScript.
Explore
Help
Register
Sign In
izaya
/
collapseos
mirror of
https://github.com/hsoft/collapseos.git
Watch
1
Star
0
Fork
You've already forked collapseos
0
Code
Issues
Releases
Wiki
Activity
eefa8e6de5
collapseos
/
forth
/
str.fs
8 lines
111 B
Forth
Raw
Blame
History
:
SLEN
( a -- n )
DUP
( astart aend )
BEGIN
DUP
C@
0
=
IF
-^
EXIT
THEN
1+
AGAIN
;
Reference in New Issue
View Git Blame
Copy Permalink