Method: (TRANSACTION-NR-DIRTY-OBJECTS STANDARD-TRANSACTION)

Source

(defmethod transaction-nr-dirty-objects ((transaction standard-transaction))
  (hash-table-count (dirty-objects transaction)))