sequences.extras: removing contains? (probably a bad name or a bad definition).

db4
John Benediktsson 2015-01-17 10:27:39 -08:00
parent b6d25ba090
commit d732195dad
1 changed files with 0 additions and 3 deletions

View File

@ -259,9 +259,6 @@ PRIVATE>
: harvest! ( seq -- newseq ) : harvest! ( seq -- newseq )
[ empty? not ] filter! ; [ empty? not ] filter! ;
: contains? ( seq elts -- ? )
[ member? ] curry any? ; inline
: head-as ( seq n exemplar -- seq' ) : head-as ( seq n exemplar -- seq' )
[ head-slice ] [ like ] bi* ; inline [ head-slice ] [ like ] bi* ; inline