Work transfer

2020-02-18 10:52:05 +01:00
parent 7aa492df67
commit 7c220ed9d6
72 changed files with 19257 additions and 19094 deletions
@@ -1,15 +1,15 @@
-((lambda ((:k1 (+ 1 2 3)))
-   (assert (= k1 6))))
-
-((lambda ((:k1 ()))
-   (when k1
-     (assert ()))
-   (assert (= k1 ()))))
-
-(define (test)
-  ((lambda ()
-     (define (a)
-       :ok)
-     (define (b (:k (begin (break) (a))))
-       k)
-     (b))))
+((lambda ((:k1 (+ 1 2 3)))
+   (assert (= k1 6))))
+
+((lambda ((:k1 ()))
+   (when k1
+     (assert ()))
+   (assert (= k1 ()))))
+
+(define (test)
+  ((lambda ()
+     (define (a)
+       :ok)
+     (define (b (:k (begin (break) (a))))
+       k)
+     (b))))