Clojureの中断されたトランザクションのカウント

Question

ClojureプログラムとCのロックバージョンの動作を分析したいと思います。私が追跡したい1つのメトリックは、Clojureプログラムの中止されたトランザクションの総数です。

唯一の問題は私がやろうとしていることはこれである私は、私は午前トランザクションのコンテキストの変数外を変異させることができないということです。もちろん

(dosync 
(try 
    (alter my_num inc) 
    (catch Throwable t 
    (do 
     (alter total_aborts inc) 
     (println "Caught " (.getClass t)) 
     (throw t))))) 

、total_abortsます。トランザクションが終了しない場合、増分されません!!!だから私はこれをどのようにすることができますか？ありがとう！

Answer 1

my-numとtotal-abortsatomsとし、alterの代わりにswap!を使用できます。