wisp
 
(Arne Babenhauserheide)
2017-10-11: fix broken indentation

fix broken indentation

diff --git a/Makefile.am b/Makefile.am
--- a/Makefile.am
+++ b/Makefile.am
@@ -1,7 +1,7 @@
 SUFFIXES = .w .scm .sh
 
 sitedir = $(GUILE_SITE)
-site_DATA = wisp-scheme.scm
+site_DATA = language/wisp.scm
 
 langdir = ${datarootdir}/guile/site/$(GUILE_EFFECTIVE_VERSION)/language/wisp
 lang_DATA = language/wisp/spec.scm language/wisp.scm
diff --git a/examples/benchmark.w b/examples/benchmark.w
--- a/examples/benchmark.w
+++ b/examples/benchmark.w
@@ -76,10 +76,10 @@ define* : benchmark-run fun
           : res : list-ec (: i sampling-steps) : benchmark-run-single fun #:min-seconds min-seconds
             std : stddev-unbiased-normal res
             mean : / (apply + res) sampling-steps
-           ;; pretty-print : list mean '± std min-seconds sampling-steps
-           if : or {sampling-steps > max-iterations} : and {std < {mean * max-relative-uncertainty}} {std < max-absolute-uncertainty-seconds}
-              . mean
-              lp (* 2 min-seconds) (* 2 sampling-steps) ;; should decrease σ by factor 2 or √2 (for slow functions)
+          ;; pretty-print : list mean '± std min-seconds sampling-steps
+          if : or {sampling-steps > max-iterations} : and {std < {mean * max-relative-uncertainty}} {std < max-absolute-uncertainty-seconds}
+             . mean
+             lp (* 2 min-seconds) (* 2 sampling-steps) ;; should decrease σ by factor 2 or √2 (for slow functions)
 
 define loopcost
   benchmark-run (λ() #f)