Handbook
Glossary
harvest-as ( seq exemplar -- newseq )
Vocabulary
sequences
.
extras
Inputs
seq
a
sequence
exemplar
an
object
Outputs
newseq
a
sequence
Word description
Outputs a new sequence with all empty sequences removed. Resulting sequence is the same class as
exemplar
.
Definition
USING:
kernel
sequences
;
IN:
sequences.extras
:
harvest-as
( seq exemplar -- newseq )
[
empty?
not
]
swap
filter-as
;