<html dir="ltr"><head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<style title="owaParaStyle"><!--P {
MARGIN-TOP: 0px; MARGIN-BOTTOM: 0px
}
--></style>
</head>
<body ocsi="x">
<div dir="ltr"><font color="#000000" size="2" face="Tahoma">Hello all, I was playing with some Haskell code that read in text files and processed them and often found myself writing empty result-files. I've pared the problem down to the following small example.</font></div>
<div dir="ltr"><font size="2" face="tahoma"></font> </div>
<div dir="ltr">
<div dir="ltr"><font size="2" face="tahoma">-- example program</font></div>
<div dir="ltr"><font color="#000000" size="2" face="Tahoma">import IO</font></div>
<div dir="ltr"><font color="#000000" size="2" face="Tahoma">main = do<br>
rhdl <- openFile "test.in" ReadMode<br>
content <- hGetContents rhdl<br>
putStrLn content -- if I cmt out this line, content will be empty<br>
hClose rhdl<br>
putStrLn "Content: "<br>
putStrLn content -- if the first 'putStrLn' call was commented, this will print a blank line</font></div>
<div dir="ltr"><font color="#000000" size="2" face="Tahoma"><font face="tahoma">-- end example</font></font></div>
<div dir="ltr"><font color="#000000" size="2" face="Tahoma"> </div>
</font></div>
<div dir="ltr"><font size="2" face="tahoma">For some reason, if I comment out the 'putStrLn content' between hGetContents and hClose, the data from the hGetContents call is not stored. Can somebody verify this behavior and (if so) explain why it's happening?</font></div>
<div dir="ltr"><font size="2" face="tahoma"></font> </div>
<div dir="ltr"><font size="2" face="tahoma">Thanks,</font></div>
<div dir="ltr"><font size="2" face="tahoma"></font> </div>
<div dir="ltr"><font size="2" face="tahoma">-- kov</font></div>
<div dir="ltr"><font size="2" face="tahoma"></font><font color="#000000" size="2" face="Tahoma"> </div>
</font>
</body>
</html>