Closes #145 fixing keyword dumping
authorDavid Vázquez <davazp@gmail.com>
Tue, 3 Sep 2013 19:24:51 +0000 (21:24 +0200)
committerDavid Vázquez <davazp@gmail.com>
Tue, 3 Sep 2013 19:24:51 +0000 (21:24 +0200)
src/compiler/compiler.lisp

index cf6bb55..4427cdd 100644 (file)
                  (push (cons sexp jsvar) *literal-table*)
                  (toplevel-compilation `(var (,jsvar ,dumped)))
                  (when (keywordp sexp)
                  (push (cons sexp jsvar) *literal-table*)
                  (toplevel-compilation `(var (,jsvar ,dumped)))
                  (when (keywordp sexp)
-                   (toplevel-compilation `(= ,(get jsvar "value") ,jsvar)))
+                   (toplevel-compilation `(= (get ,jsvar "value") ,jsvar)))
                  jsvar)))))))
 
 
                  jsvar)))))))