Method: (PERSISTENT-DATA-WRITE T PERSISTENT-DATA T)

Source

(defmethod persistent-data-write (function (data persistent-data) value
                                           &rest args)
  (apply function value (contents data) args)
  (cache-touch-object data (cache data))
  value)