]> gitweb.factorcode.org Git - factor.git/blobdiff - core/strings/strings-tests.factor
core: subseq-index? -> subseq-of?
[factor.git] / core / strings / strings-tests.factor
index b6c232f9e4dd944351202ff3a83b25abe7fadf35..0fa54fe49e5abf2b08ecd105939e46063ce06597 100644 (file)
@@ -21,22 +21,22 @@ vectors ;
 { f } [ "amigo" "hola" subseq-start ] unit-test
 { f } [ "holaa" "hola" subseq-start ] unit-test
 
-{ 3 } [ "hola" "a" subsequence-starts ] unit-test
-{ f } [ "hola" "x" subsequence-starts ] unit-test
-{ 0 } [ "a" "" subsequence-starts ] unit-test
-{ 0 } [ "" "" subsequence-starts ] unit-test
-{ 0 } [ "hola" "hola" subsequence-starts ] unit-test
-{ 1 } [ "hola" "ol" subsequence-starts ] unit-test
-{ f } [ "hola" "amigo" subsequence-starts ] unit-test
-{ f } [ "hola" "holaa" subsequence-starts ] unit-test
+{ 3 } [ "hola" "a" subseq-index ] unit-test
+{ f } [ "hola" "x" subseq-index ] unit-test
+{ 0 } [ "a" "" subseq-index ] unit-test
+{ 0 } [ "" "" subseq-index ] unit-test
+{ 0 } [ "hola" "hola" subseq-index ] unit-test
+{ 1 } [ "hola" "ol" subseq-index ] unit-test
+{ f } [ "hola" "amigo" subseq-index ] unit-test
+{ f } [ "hola" "holaa" subseq-index ] unit-test
 
 { "Beginning" } [ "Beginning and end" 9 head ] unit-test
 
 { f } [ CHAR: I "team" member? ] unit-test
 { t } [ "ea" "team" subseq? ] unit-test
 { f } [ "actore" "Factor" subseq? ] unit-test
-{ t } [ "team" "ea" subsequence? ] unit-test
-{ f } [ "Factor" "actore" subsequence? ] unit-test
+{ t } [ "team" "ea" subseq-of? ] unit-test
+{ f } [ "Factor" "actore" subseq-of? ] unit-test
 
 { "end" } [ "Beginning and end" 14 tail ] unit-test