Discussed in clojure-cn mailing list, we come up with an extensible dosync block with event listener: on-start, on-retry and on-committed.

With these extension points, you can bind STM monitor to a transaction. And I believe there will more advanced use cases on this.