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

Fixup binop unparsing

Browse source
This commit is contained in:
Ian Price 2015-06-23 15:52:42 +01:00
parent 88c052214f
commit b631576f13
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
module/language/javascript.scm
View file

@ -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