4 lines
109 B
Text
4 lines
109 B
Text
: .runtime ( a- ) time [ do time ] dip - "\n%d\n" puts ;
|
|
|
|
: test 20000 [ putn space ] iterd ;
|
|
&test .runtime
|