harvest ( seq -- newseq )

Vocabulary

sequences

Inputs

seq	a sequence

Outputs

newseq

a sequence

Word description

Outputs a new sequence with all empty sequences removed.

Examples

USING: prettyprint sequences ; { { } { 2 3 } { 5 } { } } harvest .
{ { 2 3 } { 5 } }

See also

filter, filter-as, filter!, reject, reject-as, reject!, sift

Definition

IN: sequences

: harvest ( seq -- newseq ) [ empty? ] reject ;