cased-range? ( range -- ? )

Vocabulary

regexp.nfa

Inputs

range

an object

Outputs

?

an object

Definition

USING: accessors combinators.short-circuit kernel unicode ;

IN: regexp.nfa

: cased-range? ( range -- ? )
    [ from>> ] [ to>> ] bi
    { [ [ letter? ] both? ] [ [ LETTER? ] both? ] } 2|| ;