[Guile-commits] 37/99: Fixup binop unparsing

[Christopher Allan Webber]

cwebber pushed a commit to branch compile-to-js-merge
in repository guile.

commit b631576f13677e7834a9604ee6b664f0ff2acc06
Author: Ian Price <ianprice90@googlemail.com>
AuthorDate: Tue Jun 23 15:52:42 2015 +0100

    Fixup binop unparsing
---
 module/language/javascript.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/module/language/javascript.scm b/module/language/javascript.scm
index 7486213..741282a 100644
--- a/module/language/javascript.scm
+++ b/module/language/javascript.scm
@@ -85,7 +85,7 @@
     (($ var id exp)
      `(var ,id ,(unparse-js exp)))
     (($ binop op arg1 arg2)
-     `(binop ,op ,arg1 ,arg2))))
+     `(binop ,op ,(unparse-js arg1) ,(unparse-js arg2)))))
 
 (define (print-exp exp port)
   (match exp