unicode-benchmark ( -- )

Vocabulary

benchmark.unicode

Inputs

None

Outputs

None

Definition

USING: kernel math sequences unicode ;

IN: benchmark.unicode

: unicode-benchmark ( -- )
    crazy-unicode-string 8
    [ [ >title ] [ >lower ] [ >upper ] tri 3append ] times drop
    ;