summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2009-02-22 12:07:09 +0100
committerAndy Wingo <wingo@pobox.com>2009-02-22 12:07:09 +0100
commitbb67fe27ab5cda3fcefaa1c471f75c8241cc12b2 (patch)
tree86adaef4fe8e758ccdb09825a0e5210d4ffc7b19
parent143177ed9ee93a2b8df326c431ef09de06ca8063 (diff)
downloadguile-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.scm4
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))
'())))