blocked? ( char -- ? )

Vocabulary

unicode.collation.private

Inputs

char

an object

Outputs

?

an object

Definition

USING: kernel sequences unicode.data ;

IN: unicode.collation.private

: blocked? ( char -- ? )
    combining-class dup { 0 f } member?
    [ drop building-last non-starter? ]
    [ building-last combining-class = ] if ;