update benz. support inter-referntial definitions

2014-09-10 15:27:46 +09:00
parent a0ab746fc8
commit e5d47de3b0
2 changed files with 5 additions and 5 deletions
@@ -489,10 +489,10 @@
 (define first car)
 (test 1 (first '(1 2)))

-;; (test 45 (let ((x 5))
-;;   (define foo (lambda (y) (bar x y)))
-;;   (define bar (lambda (a b) (+ (* a b) a)))
-;;   (foo (+ x 3))))
+(test 45 (let ((x 5))
+  (define foo (lambda (y) (bar x y)))
+  (define bar (lambda (a b) (+ (* a b) a)))
+  (foo (+ x 3))))

 (test 'ok
    (let ()