Method: (ADD-TO-QUEUE T STANDARD-CACHE)

Source

(defmethod add-to-queue (object-id (cache standard-cache))
  ;; Add an object to the end of the queue.
  (let ((queue (queue cache)))
    (when (cache-full-p cache)
      (queue-remove queue))
    (queue-add queue object-id)))
Source Context