10 lines
217 B
Factor
10 lines
217 B
Factor
|
USING: kernel math.parser sequences ;
|
||
|
|
IN: benchmark.parse-fixnum
|
||
|
|
|
||
|
|
: parse-fixnum-benchmark ( -- )
|
||
|
|
2,000,000 iota [
|
||
|
|
[ number>string string>number ] [ assert= ] bi
|
||
|
|
] each ;
|
||
|
|
|
||
|
|
MAIN: parse-fixnum-benchmark
|