From 4f8c6b0c4c609c7120c6850b7be29241fed1df22 Mon Sep 17 00:00:00 2001 From: =?utf8?q?David=20V=C3=A1zquez?= Date: Sun, 23 Jun 2013 21:31:32 +0200 Subject: [PATCH] Migrate SYMBOL-PLIST --- src/compiler.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/compiler.lisp b/src/compiler.lisp index c118761..1a7c3ad 100644 --- a/src/compiler.lisp +++ b/src/compiler.lisp @@ -1154,7 +1154,7 @@ `(return func))) (define-builtin symbol-plist (x) - `(code "((" ,x ").plist || " ,(ls-compile nil) ")")) + `(or (get ,x "plist") ,(ls-compile nil))) (define-builtin lambda-code (x) `(code "make_lisp_string((" ,x ").toString())")) -- 1.7.10.4