(null object)
(defun queue-empty-p (queue) (null (car queue)))
non-null
(cffi-sys:null-pointer)
(cffi-sys:null-pointer-p ptr)
nil
(defun default-driver-code () nil)
(unless test &body forms)
(defun file-pathname-p (p) (unless (directory-pathname-p p) p))