Fix bug with funcall precedence

diff --git a/src/compiler-codegen.lisp b/src/compiler-codegen.lisp
index 166c7f9..ee80ead 100644 (file)
--- a/src/compiler-codegen.lisp
+++ b/src/compiler-codegen.lisp
@@ -226,8 +226,8 @@
              (js-expr (car args))
              (js-format ")")))
        (js-format "(")
-       (when (cdr args)
-         (with-operator (12 'left)
+       (let ((*js-operator-precedence* 12))
+         (when (cdr args)
            (js-expr (cadr args))
            (dolist (operand (cddr args))
              (let ((*js-output* t))