summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorIan Price <ianprice90@googlemail.com>2015-06-23 15:52:42 +0100
committerIan Price <ianprice90@googlemail.com>2015-06-23 15:52:42 +0100
commitb631576f13677e7834a9604ee6b664f0ff2acc06 (patch)
tree65b65e67d6b840e3b20b3239ff91e5fa605ac82a
parent88c052214f257525e4c64277baa2ea23129ce060 (diff)
downloadguile-b631576f13677e7834a9604ee6b664f0ff2acc06.tar.gz
Fixup binop unparsing
-rw-r--r--module/language/javascript.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/module/language/javascript.scm b/module/language/javascript.scm
index 748621355..741282a61 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