putStrLnがコンソールに出力されない

Question

私はwxHaskellを試しています。私はghciの下でアプリケーションを実行することができませんでしたので、私はそれをテストするためにアプリケーションを使用する必要があります。 printlnのデバッグを使ってプログラムをテストしたかったのです。しかし、putStrLnはGUIでは動作しないようです。

{-# LANGUAGE Haskell2010 #-} 

module Main where 

import Graphics.UI.WX 

drawUI dc view = do 
    circle dc (point 10 10) 5 [penKind := PenSolid, color := red] 
    putStrLn "painted" 

helloGui :: IO() 
helloGui = do 
    f <- frame [ 
    text := "Example", 
    resizeable := False, 
    bgcolor := white, 
    layout := space 400 300, 
    on paint := drawUI] 
    return() 

main :: IO() 
main = do 
    putStrLn "Started" 
    start helloGui 

私がstart helloGuiをコメントアウトすると、すべてがうまく印刷されます。しかし、返すと何も印刷されませんが、ウィンドウが表示されます。ここで何が間違っていますか？

Answer 1

これはおそらく出力バッファリングです。プログラムが終了するまで出力は書き込まれません。

のいずれかを明示的にフラッシュ：

putStrLn "Started" 
    hFlush stdout 

またはラインバッファリングをオンにする：

hSetBuffering stdout LineBuffering -- or even NoBuffering 
    putStrLn "Started"