Implemented cintinuations and call/cc

2020-04-03 22:47:48 +02:00
parent 419d28f4f2
commit 7a780615f9
21 changed files with 422 additions and 203 deletions
@@ -3,7 +3,8 @@
 (define (make-counter)
  (let ((var 0))
    (lambda ()
-      (set! var (+ 1 var)))))
+      (set! var (+ 1 var))
+      var)))

 (define counter1 (make-counter))