splitting: final fix for --

locals-and-roots
Doug Coleman 2016-06-23 23:38:24 -07:00
parent 1f53ae307b
commit 2fab20e878
1 changed files with 1 additions and 1 deletions

View File

@ -102,7 +102,7 @@ PRIVATE>
split dup length 1 = [ first ] [ [ >array ] map ] if ; inline
: split-dashes ( seq -- seq/seq' )
{ -- } ?split ; inline
{ \ -- } ?split ; inline
: split-slice ( seq separators -- pieces )
[ member? ] curry split-when-slice ; inline