wisp
 
(Arne Babenhauserheide)
2017-08-21: eval ecraven: cope with projects without a single successful run

eval ecraven: cope with projects without a single successful run

diff --git a/examples/evaluate-r7rs-benchmark.w b/examples/evaluate-r7rs-benchmark.w
--- a/examples/evaluate-r7rs-benchmark.w
+++ b/examples/evaluate-r7rs-benchmark.w
@@ -99,7 +99,9 @@ let*
   format #t "=== ~a Geometric Mean slowdown ===\n" : string-locale-titlecase project-prefix
   newline
   pretty-print
-     expt
-        apply * : get-multiples guile-data data-min-by-test
-        / 1 : length : get-multiples guile-data data-min-by-test
+     if : null? : get-multiples guile-data data-min-by-test
+        . #f
+        expt
+           apply * : get-multiples guile-data data-min-by-test
+           / 1 : length : get-multiples guile-data data-min-by-test
   newline