Fix typo in arithmetic benchmark
authorMark H Weaver <mhw@netris.org>
Thu, 7 Apr 2011 06:28:01 +0000 (02:28 -0400)
committerMark H Weaver <mhw@netris.org>
Thu, 7 Apr 2011 06:31:13 +0000 (02:31 -0400)
* benchmark-suite/benchmarks/arithmetic.bm (fixnum): Fix `-' benchmark
  to actually use `-' operator instead of `+' operator.

benchmark-suite/benchmarks/arithmetic.bm

index 0755c03242b96e67f696acf233a1c1b5e37ff246..c64f6c20baf09e216ed2652b5bb0628e9c3716e5 100644 (file)
@@ -58,7 +58,7 @@
     (repeat (+ 2 <>) 7 100))
 
   (benchmark "-" 1e7
-    (repeat (+ 2 <>) 7 100))
+    (repeat (- 2 <>) 7 100))
 
   (benchmark "*" 1e7
     (repeat (* 1 <>) 1 100))