TCP 在 GHCi 中工作，在使用 Leksah 编译的程序中缓冲直到程序退出

Question

我编写了这个简单的原型客户端来将命令发送到我正在开发的服务器。它在 GHCi 中完美运行，但编译版本会缓冲输入的所有内容，直到我输入“quit”并且程序退出。此时所有输入文本都会被发送。

我做错了什么？为什么编译时会不同？

更新：如果使用 ghc Main.hs 编译，它确实可以按预期工作。当通过 Package -> 使用 Leksah 编译时，会出现此问题建造。有人知道如何获取 Leksah 使用的命令行吗？

系统信息：OSX 10.6、GHC 7.0.3、网络 2.3.0.2

module Main (
    main
) where

import System.IO
import Network

main = do
    hServer <- connectTo "localhost" (PortNumber 7000)
    hSetBuffering hServer NoBuffering
    loop hServer
    hClose hServer
    where loop :: Handle -> IO ()
          loop hServer = do
            s <- getLine
            hPutStrLn hServer s
            case s of "quit" -> return ()
                      otherwise -> loop hServer

Answer 1

Leksah 使用“cabal build”，旧版本使用“runhaskell setup build”。

Answer 2

嗯，看起来 Leksah 并没有真正构建这个应用程序，而我认为它是这样的。我一定是在没有 hSetBuffering 调用的情况下运行旧代码。一个干净的&重建已经解决了。向大家致歉并感谢您的时间和帮助。

编辑：找到它 - 如果其他人对此感到困惑，当单击 package->build 时，如果处于调试/ghci 模式，Leksah 不会生成已编译的应用程序。