sequences: adding related-words for filter and reject.

db4
John Benediktsson 2015-05-12 19:08:21 -07:00
parent 016e03410d
commit 55122d9141
1 changed files with 4 additions and 0 deletions

View File

@ -513,6 +513,8 @@ HELP: filter!
{ $description "Applies the quotation to each element in turn, and removes elements for which the quotation outputs a false value." }
{ $side-effects "seq" } ;
{ filter filter-as filter! } related-words
HELP: reject
{ $values { "seq" sequence } { "quot" { $quotation ( ... elt -- ... ? ) } } { "subseq" "a new sequence" } }
{ $description "Applies the quotation to each element in turn, and outputs a new sequence removing with the elements of the original sequence for which the quotation output a true value." } ;
@ -526,6 +528,8 @@ HELP: reject!
{ $description "Applies the quotation to each element in turn, and removes elements for which the quotation outputs a true value." }
{ $side-effects "seq" } ;
{ reject reject-as reject! } related-words
HELP: interleave
{ $values { "seq" sequence } { "between" quotation } { "quot" { $quotation ( ... elt -- ... ) } } }
{ $description "Applies " { $snippet "quot" } " to each element in turn, also invoking " { $snippet "between" } " in-between each pair of elements." }