]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/rosetta-code/text-processing/max-licenses/max-licenses.factor
sequences: rename subsequence? words to subseq? again.
[factor.git] / extra / rosetta-code / text-processing / max-licenses / max-licenses.factor
index dd064e580fd54086af3bd2f866de1d83e2877c45..4bf895ccbaae11281b71416b70156cd0cabb3cc6 100644 (file)
@@ -32,7 +32,7 @@ TUPLE: maxlicense max-count current-count times ;
 
 : <maxlicense> ( -- max ) -1 0 V{ } clone \ maxlicense boa ; inline
 
-: out? ( line -- ? ) "OUT" subsequence? ; inline
+: out? ( line -- ? ) "OUT" subseq-index? ; inline
 
 : line-time ( line -- time ) split-words harvest fourth ; inline