Fix benchmark

2008-09-03 21:03:31 -05:00 · 2008-09-03 21:03:31 -05:00 · 90b2bfbc43
parent 15391abdd7
commit 90b2bfbc43
1 changed files with 1 additions and 1 deletions
--- a/extra/benchmark/typecheck4/typecheck4.factor
+++ b/extra/benchmark/typecheck4/typecheck4.factor
@ -3,7 +3,7 @@ IN: benchmark.typecheck4

 TUPLE: hello n ;

-: hello-n* ( obj -- val ) 3 slot ;
+: hello-n* ( obj -- val ) 2 slot ;

 : foo ( obj -- obj n ) 0 100000000 [ over hello-n* + ] times ;