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

diff --git a/core/splitting/splitting.factor b/core/splitting/splitting.factor
index 9a430c0dfd7991cd53a10d2f62b396d7cde326ec..9cebb73a0b0c6c293b7a4087233136ce87ece5ac 100644 (file)
--- a/core/splitting/splitting.factor
+++ b/core/splitting/splitting.factor
@@ -95,6 +95,9 @@ PRIVATE>
 : split ( seq separators -- pieces )
     [ member? ] curry split-when ; inline
 
+: split-slice ( seq separators -- pieces )
+    [ member? ] curry split-when-slice ; inline
+
 <PRIVATE
 
 : (split*) ( n seq quot: ( ... elt -- ... ? ) quot -- )
@@ -117,6 +120,9 @@ PRIVATE>
 : split* ( seq separators -- pieces )
     [ member? ] curry split*-when ; inline
 
+: split*-slice ( seq separators -- pieces )
+    [ member? ] curry split*-when-slice ; inline
+
 GENERIC: string-lines ( str -- seq )
 
 M: string string-lines