alpha? ( object -- ? )

Vocabulary

unicode

Inputs and outputs

object	an object
?	a boolean

Word description

Tests if the object is an instance of the alpha class.

Definition

USING: kernel math sequences unicode.data ;

IN: unicode

: alpha? ( object -- ? )
    dup integer? [
        integer>fixnum-strict
        dup
        category-num
        B{ 1 2 3 4 5 9 10 11 }
        member?
        [ drop t ]
        [ "Other_Alphabetic" property? ]
        if
    ] [ drop f ] if ;