diff options
author | Andy Wingo <wingo@pobox.com> | 2009-02-22 12:07:09 +0100 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2009-02-22 12:07:09 +0100 |
commit | bb67fe27ab5cda3fcefaa1c471f75c8241cc12b2 (patch) | |
tree | 86adaef4fe8e758ccdb09825a0e5210d4ffc7b19 | |
parent | 143177ed9ee93a2b8df326c431ef09de06ca8063 (diff) | |
download | guile-bb67fe27ab5cda3fcefaa1c471f75c8241cc12b2.tar.gz |
fix "for" compilation
* module/language/ecmascript/compile-ghil.scm (comp): Whoops, fix `for'
compilation.
-rw-r--r-- | module/language/ecmascript/compile-ghil.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/module/language/ecmascript/compile-ghil.scm b/module/language/ecmascript/compile-ghil.scm index 3aa007a7e..d2c8385fb 100644 --- a/module/language/ecmascript/compile-ghil.scm +++ b/module/language/ecmascript/compile-ghil.scm @@ -442,8 +442,8 @@ (make-ghil-if e l (comp (or test 'true) e) (make-ghil-begin - e l (list (comp (or inc '(begin)) e) - (comp statement e) + e l (list (comp statement e) + (comp (or inc '(begin)) e) (make-ghil-call e l (make-ghil-ref e l (ghil-var-for-ref! e '%continue)) '()))) |