<br><div class="gmail_quote">On Sun, Oct 18, 2009 at 8:01 AM, Alexander Dunlap <span dir="ltr">&lt;<a href="mailto:alexander.dunlap@gmail.com">alexander.dunlap@gmail.com</a>&gt;</span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;">

<div><div></div><div class="h5"><br></div></div>
<br>
The way I would count all of the lines in a file is (untested)<br>
<br>
fCountLines :: String -&gt; IO Int<br>
fCountLines = length . lines . readFile<br>
<br></blockquote><div><br></div><div>I&#39;m not sure if I did something wrong, but I could not get this to work because &#39;readFile&#39; returns an IO String.  I tried the following and it worked. </div><div><br></div>

<div> fileLines str = readFile str &gt;&gt;= return . lines &gt;&gt;= return . length </div><div><br></div><div>Is this a reasonable way to count lines?</div></div>