Some fixes

[jscl.git] / src / compiler-codegen.lisp

diff --git a/src/compiler-codegen.lisp b/src/compiler-codegen.lisp
index 129f892..2d8f11d 100644 (file)
--- a/src/compiler-codegen.lisp
+++ b/src/compiler-codegen.lisp
@@ -211,6 +211,7 @@
   (let ((op1 (car args))
         (op2 (cadr args)))
     (case op
+      ;; Transactional compatible operator
       (code
        (js-format "~a" (apply #'code args)))
       ;; Function call