splitting: final fix for --
parent
1f53ae307b
commit
2fab20e878
|
@ -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
|
||||
|
|
Loading…
Reference in New Issue