base85-benchmark ( -- )

Vocabulary

benchmark.base85

Inputs

None

Outputs

None

Definition

USING: base85 kernel math sequences ;

IN: benchmark.base85

: base85-benchmark ( -- )
    65535 <iota> [ 255 bitand ] "" map-as 20
    [ >base85 base85> ] times drop ;