为什么 Replit 上的 GHC 会多次打印我的输入？

Question

我正在使用 Replit 网站使用 GHC 运行 Haskell 程序。我在编辑器中输入代码并使用“运行”按钮运行它，而不仅仅是使用 GHCi 运行代码行。getLine每当我使用该函数时，即使在极其简单的程序中，我也会遇到奇怪的输出问题。例如，运行程序

main = do ans <- getLine
          putStrLn ans

hi在输入提示处键入会打印hi两次而不是一次：

cabal v1-run
Preprocessing executable 'Cabal-example' for Cabal-example-0.1.0.0..
Building executable 'Cabal-example' for Cabal-example-0.1.0.0..
[1 of 1] Compiling Main             ( Main.hs, dist/build/Cabal-example/Cabal-example-tmp/Main.o )
Linking dist/build/Cabal-example/Cabal-example ...
Running Cabal-example...
 hi
hi
hi

当我尝试禁用函数中的输入/输出缓冲时，问题变得更加奇怪main（我需要为我正在开发的更大的程序执行此操作）：

cabal v1-run
Preprocessing executable 'Cabal-example' for Cabal-example-0.1.0.0..
Building executable 'Cabal-example' for Cabal-example-0.1.0.0..
[1 of 1] Compiling Main             ( Main.hs, dist/build/Cabal-example/Cabal-example-tmp/Main.o )
Linking dist/build/Cabal-example/Cabal-example ...
Running Cabal-example...
 hi
hi^Jhi

我在其他网站上测试过这段代码，代码运行正常。我在这里缺少什么？

Answer 1

我可以使用 Haskell Cabal 模板进行复制。看起来像此模板的“控制台”选项卡中的“replit”错误。控制台独立于 Haskell 程序回显用户输入。尝试一下该程序：

main = do
  putStrLn "Enter something"
  getLine
  putStrLn "I'm printing something else"

并且输出将包括回显输入。（第一个“foo”之前的空格也不应该存在。）

Running Cabal-example...
Enter something
 foo   <-- what I entered
foo    <-- echoed by the Console
I'm printing something else

尝试使用“cabal v1-run”在“Shell”选项卡中运行您的程序，它应该可以正常工作：

~/SympatheticVastHypothesis$ cabal v1-run
Preprocessing executable 'Cabal-example' for Cabal-example-0.1.0.0..
Building executable 'Cabal-example' for Cabal-example-0.1.0.0..
Running Cabal-example...
Enter something
This won't echo     <-- what I entered
I'm printing something else
~/SympatheticVastHypothesis$ 

我认为您可能必须将其作为错误报告给 replit 人员。