Как я могу увидеть количество откатов в моем STM в Clojure?

Question

Как узнать количество откатов в моем STM в Clojure?

Answer 1

Вы не можете ... если вы не готовы обмануть:

(defmacro spy-dosync [& body]
  `(let [retries# (atom -1)
         result# (dosync
                   (swap! retries# inc)
                   ~@body)]
     (println "retries count:" @retries#)
     result#))

и затем замените свою досинхронизацию шпионской дозинкейкой.

Answer 2

Если вы чувствуете себя резвым, вы можете взломать источник Clojure и восстановить его ( просто восстановить исходный код Clojure). Попытки транзакции происходят в src / jvm / clojure / lang / LockingTransaction.java в методе run (). Там есть большой цикл for, который идет до завершения или RETRY_LIMIT. Значение i при выходе из цикла должно быть числом повторов.

Answer 3

Существует STM-стресс тест , написанный Крисом Хаузером, который может быть полезен