Function: P-CONS

Source

(defun p-cons (car cdr)
  (make-persistent-data 'persistent-cons (cons car cdr)))