;; these return NIL,NIL (subtypep 'fixnum nil) (subtypep 'string nil) (subtypep 'array nil) (subtypep 'vector nil) (subtypep 'simple-vector nil) (subtypep '(simple-array float (*)) nil) ;; OK (subtypep 'integer nil) (subtypep 'float nil) (subtypep 'bignum nil) (subtypep 'pathname nil) (subtypep t nil) (subtypep nil nil)