>>138
次のようにやっても効果ありません。

main = do
  hSetBuffering stdin NoBuffering
  a <- getChar
  b <- getChar
  print a
  print b

main を実行すると入力待ちになり、[a] キーを押すとコンソールに a と表示され、
さらに入力待ち状態になります。
次に [Enter] キーを押すと、下記のように表示されてプログラム終了です。

'a'
'\n'