Name
split-next-line:toolbelt — ordinary primitive
Synopsis
FORTH
SPLIT-NEXT-LINE
( src . -- src' . str len )( | ); | |
Description
Split the next line from the string.
: SPLIT-NEXT-LINE
2DUP #EOL-CHAR SCAN
DUP >R 1 /STRING 2SWAP R> - ;
FIXME: inform Neil Bawd that this is probably
not what he wanted. replace /STRING with /SPLIT here.