check-illegal-character ( ch -- ch )

Vocabulary

uu.private

Inputs

ch

an object

Outputs

ch

an object

Definition

USING: kernel math math.order ;

IN: uu.private

: check-illegal-character ( ch -- ch )
    dup 32 dup 64 + between? [ illegal-character ] unless ;