X-Git-Url: http://git.cielonegro.org/gitweb.cgi?p=wavpack.git;a=blobdiff_plain;f=examples%2FWvInfo.hs;h=5e0b86fbe62bdbd020e6dc76bbbbcf78752808a3;hp=8b1f5b4dfdafbf659d46b34fc136e972ace9a5f5;hb=79fe8094594b6b25d7d9c44bc128418d69f1da95;hpb=acfc910ebb15715da125f86d473ab907f7f95698

diff --git a/examples/WvInfo.hs b/examples/WvInfo.hs
index 8b1f5b4..5e0b86f 100644
--- a/examples/WvInfo.hs
+++ b/examples/WvInfo.hs
@@ -7,10 +7,12 @@ import Codec.Audio.WavPack.Block
 import qualified Data.ByteString.Lazy as L
 import qualified Data.Strict as S
 import System.Environment
+import System.IO
 
 main ∷ IO ()
 main = do [wvFile] ← getArgs
           wvStream ← L.readFile wvFile
+          hSetBuffering stdout NoBuffering
           showWvInfo wvStream
 
 showWvInfo ∷ L.ByteString → IO ()