projects
/
jscl.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
(from parent 1:
4410f13
)
Merge branch 'master' into mutable-strings
author
David Vázquez
<davazp@gmail.com>
Fri, 3 May 2013 16:02:10 +0000
(17:02 +0100)
committer
David Vázquez
<davazp@gmail.com>
Fri, 3 May 2013 16:02:10 +0000
(17:02 +0100)
jscl.lisp
patch
|
blob
|
history
diff --git
a/jscl.lisp
b/jscl.lisp
index
ebf6f0d
..
e49e696
100644
(file)
--- a/
jscl.lisp
+++ b/
jscl.lisp
@@
-83,7
+83,8
@@
;; not collide with the compiler itself.
(late-compile
`(progn
- ,@(mapcar (lambda (s) `(%intern-symbol (%js-vref ,(cdr s)))) *literal-table*)
+ ,@(mapcar (lambda (s) `(%intern-symbol (%js-vref ,(cdr s))))
+ (remove-if-not #'symbolp *literal-table* :key #'car))
(setq *literal-table* ',*literal-table*)
(setq *variable-counter* ,*variable-counter*)
(setq *gensym-counter* ,*gensym-counter*)))