Fix buggy benchmarks
parent
2d19b38683
commit
4ca0c49280
|
@ -3,7 +3,7 @@ IN: benchmark.typecheck2
|
||||||
|
|
||||||
TUPLE: hello n ;
|
TUPLE: hello n ;
|
||||||
|
|
||||||
: hello-n* dup tuple? [ 4 slot ] [ 3 throw ] if ;
|
: hello-n* dup tuple? [ 3 slot ] [ 3 throw ] if ;
|
||||||
|
|
||||||
: foo 0 100000000 [ over hello-n* + ] times ;
|
: foo 0 100000000 [ over hello-n* + ] times ;
|
||||||
|
|
||||||
|
|
|
@ -3,7 +3,7 @@ IN: benchmark.typecheck3
|
||||||
|
|
||||||
TUPLE: hello n ;
|
TUPLE: hello n ;
|
||||||
|
|
||||||
: hello-n* dup tag 2 eq? [ 4 slot ] [ 3 throw ] if ;
|
: hello-n* dup tag 2 eq? [ 3 slot ] [ 3 throw ] if ;
|
||||||
|
|
||||||
: foo 0 100000000 [ over hello-n* + ] times ;
|
: foo 0 100000000 [ over hello-n* + ] times ;
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue