[Haskell-cafe] Implementing pi-calculus using STM