wisp
 
(Arne Babenhauserheide)
2014-01-09: C-code with 10^7 iterations, scheme with 10^5

C-code with 10^7 iterations, scheme with 10^5

diff --git a/examples/tinyenc.c b/examples/tinyenc.c
--- a/examples/tinyenc.c
+++ b/examples/tinyenc.c
@@ -36,7 +36,7 @@ int main ()
   int i;
   uint32_t res = 0;
   // performance test
-  for (i=0; i<1000000; i++) // 10^6!
+  for (i=0; i<10000000; i++) // 10^7!
     {
       encrypt(v, k);
       res += v[1]; // avoid optimizing this loop away.
diff --git a/examples/tinyenc.w b/examples/tinyenc.w
--- a/examples/tinyenc.w
+++ b/examples/tinyenc.w
@@ -112,6 +112,6 @@ define : testdecrypt
            . 9
 
 let loop : : step 0
-    when : < step 100000
+    when : < step 100000 ; 10^5
        testdecrypt
        loop : + 1 step