From: David Vázquez <davazp@gmail.com>
Date: Sun, 23 Jun 2013 19:10:16 +0000 (+0200)
Subject: Migrate CONS
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=dcfb8365289fa8b47ba0ce4a469e3b77f6dd5abf;p=jscl.git

Migrate CONS
---

diff --git a/src/compiler.lisp b/src/compiler.lisp
index 63195db..88fafe2 100644
--- a/src/compiler.lisp
+++ b/src/compiler.lisp
@@ -1086,7 +1086,7 @@
     "make_lisp_string(x.toString())"))
 
 (define-builtin cons (x y)
-  `(code "({car: " ,x ", cdr: " ,y "})"))
+  `(object "car" ,x "cdr" ,y))
 
 (define-builtin consp (x)
   (js!bool