update benz. support inter-referntial definitions

This commit is contained in:
Yuichi Nishiwaki 2014-09-10 15:27:46 +09:00
parent a0ab746fc8
commit e5d47de3b0
2 changed files with 5 additions and 5 deletions

@ -1 +1 @@
Subproject commit e6a2af0bf617e69abd2c434a32979ab13578bb7e Subproject commit 3a7fb12b2f30986c5dac1b9379d660e491b0f27e

View File

@ -489,10 +489,10 @@
(define first car) (define first car)
(test 1 (first '(1 2))) (test 1 (first '(1 2)))
;; (test 45 (let ((x 5)) (test 45 (let ((x 5))
;; (define foo (lambda (y) (bar x y))) (define foo (lambda (y) (bar x y)))
;; (define bar (lambda (a b) (+ (* a b) a))) (define bar (lambda (a b) (+ (* a b) a)))
;; (foo (+ x 3)))) (foo (+ x 3))))
(test 'ok (test 'ok
(let () (let ()