Haskell - putStr vs putStrLn 和指令顺序

Question

假设我们有一个简短的 haskell 程序：

main = do putStr "2 + 2 = "
          x <- readLn
          if x == 4
             then putStrLn "Correct"
             else putStrLn "Wrong"

它产生什么输出？

4

2 + 2 = 正确

现在让我们再来一个：

main = do putStrLn "2 + 2 = "
          x <- readLn
          if x == 4
             then putStrLn "Correct"
             else putStrLn "Wrong"

那个产生

2 + 2 =

4

正确

粗体 4 是用户输入的。

任何熟悉 Haskell 的人可以向我解释为什么会这样吗？ 以及如何获得想要的结果，即

2 + 2 = 4

正确

Answer 1

行缓冲。在写入完整的文本行之前，不会“刷新”输出缓冲区。

两种解决方案：

1. 手动刷新缓冲区。 （putStr 后跟 hFlush stdout。）
2. 关闭缓冲。 (hSetBuffering stdout NoBuffering.)