TCP works in GHCi, buffered until program exit in program compiled with Leksah

Question

I wrote this simple prototype client to send commands to a server I'm developing. It works perfectly running in GHCi, but the compiled version buffers everything typed in until I type in "quit" and the program exits. At that point all the input text gets sent.

What am I doing wrong? And why is it different when compiled?

Update: it does work as expected if compiled with ghc Main.hs. The problem happens when compiled with Leksah via Package -> Build. Anyone know how to get the command line Leksah is using?

System info: OSX 10.6, GHC 7.0.3, network 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

Works for me. ghc-7.0.3, network-2.3.0.2, OS X 10.6. Could you include your system/haskell-platform versions? — John L
+1 for Leksah. We need to get more attention on this unique Haskell IDE. — Dan Burton

Jutaro Jutaro · Accepted Answer · 2011-05-05T06:03:11

1

votes

Leksah uses "cabal build", older versions "runhaskell Setup build".

TCP works in GHCi, buffered until program exit in program compiled with Leksah

2 Answers