load-special-casing ( -- special-casing )

Vocabulary

unicode.data.private

Inputs

None

Outputs

special-casing

an object

Definition

USING: kernel make sequences simple-flat-file ;

IN: unicode.data.private

: load-special-casing ( -- special-casing )
    "vocab:unicode/SpecialCasing.txt" load-data-file
    [ length 5 = ] filter [ [ set-code-point ] each ] H{ } make
    ;