Method: (CACHE-COUNT STANDARD-CACHE)

Source

(defmethod cache-count ((cache standard-cache))
  (+ (hash-table-count (objects cache))
     (loop for transaction being the hash-value of (transactions cache)
           sum (transaction-nr-dirty-objects transaction))))