mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-12 23:00:22 +02:00
Code Activity

fix "for" compilation

Browse source 
* module/language/ecmascript/compile-ghil.scm (comp): Whoops, fix `for'
  compilation.
This commit is contained in:
Andy Wingo 2009-02-22 12:07:09 +01:00
parent 143177ed9e
commit bb67fe27ab
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
module/language/ecmascript/compile-ghil.scm
View file

@ -442,8 +442,8 @@
(make-ghil-if (make-ghil-if
e l (comp (or test 'true) e) e l (comp (or test 'true) e)
(make-ghil-begin (make-ghil-begin
e l (list (comp (or inc '(begin)) e) e l (list (comp statement e)
(comp statement e) (comp (or inc '(begin)) e)
(make-ghil-call e l (make-ghil-ref (make-ghil-call e l (make-ghil-ref
e l (ghil-var-for-ref! e '%continue)) e l (ghil-var-for-ref! e '%continue))
'()))) '())))