RE: Re[2]: [Haskell-cafe] STM, orElse and timed read from a channel