steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

splitting: adding split-slice and split*-slice for completeness.

db4
John Benediktsson 2013-03-27 16:29:13 -07:00
parent 7bf3cf4922
commit ae4e53fd5b
1 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
core/splitting/splitting.factor
View File

@ -95,6 +95,9 @@ PRIVATE>
: split ( seq separators -- pieces ) : split ( seq separators -- pieces )
[ member? ] curry split-when ; inline [ member? ] curry split-when ; inline
: split-slice ( seq separators -- pieces )
[ member? ] curry split-when-slice ; inline
<PRIVATE <PRIVATE
: (split*) ( n seq quot: ( ... elt -- ... ? ) quot -- ) : (split*) ( n seq quot: ( ... elt -- ... ? ) quot -- )
@ -117,6 +120,9 @@ PRIVATE>
: split* ( seq separators -- pieces ) : split* ( seq separators -- pieces )
[ member? ] curry split*-when ; inline [ member? ] curry split*-when ; inline
: split*-slice ( seq separators -- pieces )
[ member? ] curry split*-when-slice ; inline
GENERIC: string-lines ( str -- seq ) GENERIC: string-lines ( str -- seq )
M: string string-lines M: string string-lines