core: find-subseq -> subsequence-starts, find-subseq-from -> subsequence-starts-from

[factor.git] / extra / rosetta-code / text-processing / max-licenses / max-licenses.factor

diff --git a/extra/rosetta-code/text-processing/max-licenses/max-licenses.factor b/extra/rosetta-code/text-processing/max-licenses/max-licenses.factor
index 2b875f97266fa4128cd0299aa9f244235192cfa6..dd064e580fd54086af3bd2f866de1d83e2877c45 100644 (file)
--- a/extra/rosetta-code/text-processing/max-licenses/max-licenses.factor
+++ b/extra/rosetta-code/text-processing/max-licenses/max-licenses.factor
@@ -32,7 +32,7 @@ TUPLE: maxlicense max-count current-count times ;
 
 : <maxlicense> ( -- max ) -1 0 V{ } clone \ maxlicense boa ; inline
 
-: out? ( line -- ? ) "OUT" find-subseq? ; inline
+: out? ( line -- ? ) "OUT" subsequence? ; inline
 
 : line-time ( line -- time ) split-words harvest fourth ; inline