X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fboot.lisp;h=d233b93130711be851ba5cca8adf5fed9da2da7d;hb=2b5c14e67b11a0e45f683b40dfd15c78b83ea3bf;hp=3541b23a863e800e602dc220d4542eb2eba185b3;hpb=916539de6153df7b4f6838c5e03ef420a890256c;p=jscl.git

diff --git a/src/boot.lisp b/src/boot.lisp
index 3541b23..d233b93 100644
--- a/src/boot.lisp
+++ b/src/boot.lisp
@@ -501,6 +501,8 @@
                          `((,(ecase (car c)
                                     (integer 'integerp)
                                     (cons 'consp)
+                                    (list 'listp)
+                                    (sequence 'sequencep)
                                     (symbol 'symbolp)
                                     (function 'functionp)
                                     (float 'floatp)