[Haskell-cafe] IO trouble