wisp
 
(Arne Babenhauserheide)
2017-11-11: use literal array syntax in examples/doctests.w tip

use literal array syntax in examples/doctests.w

diff --git a/examples/doctests.w b/examples/doctests.w
--- a/examples/doctests.w
+++ b/examples/doctests.w
@@ -98,22 +98,24 @@ define : doctests-extract-from-string s
 
 define : subtract a b
     . "Subtract B from A."
-    . #((tests (test-eqv 3 (subtract 5 2))))
+    ##
+      tests : test-eqv 3 (subtract 5 2)
     - a b
 
 define : doctests-testmod mod
        . "Execute all doctests in the current module
 
           This procedure provides an example test:"
-       . #((tests 
-            ('mytest
-              (define v (make-vector 5 99))
-              (test-assert (vector? v))
-              (test-eqv 99 (vector-ref v 2))
-              (vector-set! v 2 7)
-              (test-eqv 7 (vector-ref v 2)))
-            ('mytest2
-              (test-assert #t))))
+       ##
+         tests
+            'mytest
+              define v (make-vector 5 99)
+              test-assert (vector? v)
+              test-eqv 99 (vector-ref v 2)
+              vector-set! v 2 7
+              test-eqv 7 (vector-ref v 2)
+            'mytest2
+              test-assert #t
        ;; thanks to Vítor De Araújo: https://lists.gnu.org/archive/html/guile-user/2017-08/msg00003.html
        let*
            : names : module-map (λ (sym var) sym) mod