I think I did Lisp_Object SSO
This commit is contained in:
@@ -1,4 +1,4 @@
|
||||
(define (make-counter) (let ((var 0.000000)) (lambda nil (mutate var (+ 1.000000 var)) var)))
|
||||
(define (make-counter) (let ((var 0.000000)) (lambda () (mutate var (+ 1.000000 var)) var)))
|
||||
|
||||
(define counter1 (make-counter))
|
||||
|
||||
|
||||
Reference in New Issue
Block a user