sequences: rename subsequence? words to subseq? again.

[factor.git] / extra / combinators / extras / extras-tests.factor

diff --git a/extra/combinators/extras/extras-tests.factor b/extra/combinators/extras/extras-tests.factor
index 506dedb3155def7e26116a9485cb98069951dd43..0f70125a27691f02386083e1a8682117e9e63bbf 100644 (file)
--- a/extra/combinators/extras/extras-tests.factor
+++ b/extra/combinators/extras/extras-tests.factor
@@ -65,23 +65,23 @@ IN: combinators.extras.tests
 
 { "hi " "there" } [
     "hi there" {
-        { [ dup "there" subsequence-starts ] [ cut ] }
+        { [ dup "there" subseq-index ] [ cut ] }
         [ f ]
     } cond*
 ] unit-test
 
 { "hi " "there" } [
     "hi there" {
-        { [ dup "foo" subsequence-starts ] [ head f ] }
-        { [ dup "there" subsequence-starts ] [ cut ] }
+        { [ dup "foo" subseq-index ] [ head f ] }
+        { [ dup "there" subseq-index ] [ cut ] }
         [ f ]
     } cond*
 ] unit-test
 
 { "hi there" f } [
     "hi there" {
-        { [ dup "foo" subsequence-starts ] [ head f ] }
-        { [ dup "bar" subsequence-starts ] [ cut ] }
+        { [ dup "foo" subseq-index ] [ head f ] }
+        { [ dup "bar" subseq-index ] [ cut ] }
         [ f ]
     } cond*
 ] unit-test