base64-benchmark ( -- )

Vocabulary

benchmark.base64

Inputs

None

Outputs

None

Definition

USING: base64 kernel math sequences ;

IN: benchmark.base64

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