Replying to myself, On Sat, 2007-05-26 at 12:49 +0200, Andy Wingo wrote: > On Fri, 2007-05-25 at 20:12 +0200, Ludovic Courtès wrote: > > (pass-if "binding is created before expression is evaluated" > > (= (eval '(begin > > (define foo > > (begin > > (set! foo 1) > > (+ foo 1))) > > foo) > > (interaction-environment)) > > 2))
This test case was added by Dirk in on 26 April 2004: http://cvs.savannah.gnu.org/viewvc/guile/guile-core/test-suite/tests/syntax.test?root=guile&view=log#rev1.33 The commit message is interesting. It is also when he reordered the lines in scm_m_define. I do think that its intention fails though; to me the above is not valid Scheme. Regards, Andy. -- http://wingolog.org/ _______________________________________________ Guile-devel mailing list Guile-devel@gnu.org http://lists.gnu.org/mailman/listinfo/guile-devel
