take-longest ( sequence-parser seq -- seq )

Vocabulary

sequences.parser

Inputs

sequence-parser	a sequence-parser
seq	a sequence

Outputs

seq	a sequence

Definition

IN: sequences.parser

: take-longest ( sequence-parser seq -- seq )
    sort-tokens take-first-matching ;