1.0name-start? ( object -- ? )

Vocabulary

xml.char-classes

Inputs and outputs

object	an object
?	a boolean

Word description

Tests if the object is an instance of the 1.0name-start class.

Definition

USING: combinators.short-circuit kernel math math.order
sequences unicode.data ;

IN: xml.char-classes

: 1.0name-start? ( object -- ? )
    dup integer? [
        integer>fixnum-strict
        dup
        category-num
        B{ 2 1 5 3 10 }
        member?
        [ drop t ]
        [ { [ 699 705 between? ] [ "ՙۥۦ_:" member? ] } 1|| ]
        if
    ] [ drop f ] if ;