sequences: rename subsequence? words to subseq? again.

[factor.git] / core / splitting / splitting.factor

diff --git a/core/splitting/splitting.factor b/core/splitting/splitting.factor
index 42a1aaeb922e081d005e482a0ea116bf6eeec18c..c65835861318634a8c9f79794840bd29caf5b1c3 100644 (file)
--- a/core/splitting/splitting.factor
+++ b/core/splitting/splitting.factor
@@ -28,7 +28,7 @@ PRIVATE>
 <PRIVATE
 
 : subseq-range ( seq subseq -- from/f to/f )
-    [ subsequence-starts ] keep '[ dup _ length + ] [ f f ] if* ; inline
+    [ subseq-index ] keep '[ dup _ length + ] [ f f ] if* ; inline
 
 : (split1) ( seq subseq snip-quot -- before after )
     [ [ subseq-range ] keepd over ] dip [ 2nip f ] if ; inline