bug hunt work transfer

2019-09-26 18:24:54 +02:00
parent d42ada70ef
commit 9677dc1f16
16 changed files with 884594 additions and 39 deletions
@@ -5,3 +5,13 @@
   (when k1
     (assert ()))
   (assert (= k1 ()))))
+
+(define (test)
+  ((lambda ()
+     (define (a)
+       :ok)
+     (define (b (:k (begin (break) (a))))
+       k)
+     (b))))
+
+(print "k was" (test))