[Haskell-cafe] Read a single char