Adjusted to make run for longer.

diff --git a/v8/src/bench/dderiv.scm b/v8/src/bench/dderiv.scm
index 8c332c63a617f1c70cc3adb2ffa57fc4022c41bb..ad1e5abea03ebb8ca91683c25024be8ca0f249d7 100644 (file)
--- a/v8/src/bench/dderiv.scm
+++ b/v8/src/bench/dderiv.scm
@@ -74,7 +74,7 @@
  
 (define (run)
   (do ((i 0 (+ i 1)))
-      ((= i 1000))
+      ((= i 5000))                     ; 1000 in original
     (dderiv '(_+ (_* 3 x x) (_* a x x) (_* b x) 5))
     (dderiv '(_+ (_* 3 x x) (_* a x x) (_* b x) 5))
     (dderiv '(_+ (_* 3 x x) (_* a x x) (_* b x) 5))