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

splitting: making split inline.

John Benediktsson 2012-08-06 15:08:16 -07:00
parent c96fc74411
commit 54d9cb30e1
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
core/splitting/splitting.factor
View File

@ -68,7 +68,7 @@ PRIVATE>
PRIVATE> PRIVATE>
: split ( seq separators -- pieces ) : split ( seq separators -- pieces )
[ [ member? ] curry split, ] { } make ; [ [ member? ] curry split, ] { } make ; inline
: split-when ( ... seq quot: ( ... elt -- ... ? ) -- ... pieces ) : split-when ( ... seq quot: ( ... elt -- ... ? ) -- ... pieces )
[ split, ] { } make ; inline [ split, ] { } make ; inline
@ -86,7 +86,7 @@ PRIVATE>
PRIVATE> PRIVATE>
: split* ( seq separators -- pieces ) : split* ( seq separators -- pieces )
[ [ member? ] curry split*, ] { } make ; [ [ member? ] curry split*, ] { } make ; inline
: split*-when ( ... seq quot: ( ... elt -- ... ? ) -- ... pieces ) : split*-when ( ... seq quot: ( ... elt -- ... ? ) -- ... pieces )
[ split*, ] { } make ; inline [ split*, ] { } make ; inline