Method: (P-CDR (EQL NIL))

Source

(defmethod p-cdr ((x (eql nil)))
  nil)