[Haskell-cafe] STM orElse semantics