ssageDialog
软件事务内存.10个线程操纵一个共享数据结构，该结构由100个向量组成，而每个向量包含10个（最初是连续的）唯一数字。每个线程随后在两个随机向量中重复选择两个随机位置并交换它们。通过使用Clojure的软件事务内存系统，对向量的所有更改都发生在事务中：(defn run[0 1 2 3 4 5 6 7 8 9][10 11 12 13 14 15 16 17 18 19][990 991 992 993 994 995 996 997 998 999