Method: (P-CAR PERSISTENT-CONS)

Source

(defmethod p-car ((cons persistent-cons))
  (persistent-data-read #'car cons))