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