sequence>instance ( seq empty class -- instance )

Vocabulary

regexp.classes

Inputs

seq	an object
empty	an object
class	an object

Outputs

instance

an object

Definition

USING: combinators kernel sequences ;

IN: regexp.classes

:: sequence>instance ( seq empty class -- instance )
    seq length {
        { 0 [ empty ] }
        { 1 [ seq first ] }
        [ drop seq { } like class boa ]
    } case ; inline