<?xml version="1.0" encoding="UTF-8"?><rss version="2.0"
	xmlns:content="http://purl.org/rss/1.0/modules/content/"
	xmlns:dc="http://purl.org/dc/elements/1.1/"
	xmlns:atom="http://www.w3.org/2005/Atom"
	xmlns:sy="http://purl.org/rss/1.0/modules/syndication/"
		>
<channel>
	<title>Comments on: Listing files in Haskell</title>
	<atom:link href="http://therning.org/magnus/archives/228/feed" rel="self" type="application/rss+xml" />
	<link>http://therning.org/magnus/archives/228</link>
	<description>Incoherent mumblings</description>
	<lastBuildDate>Wed, 08 Aug 2012 00:21:01 +0000</lastBuildDate>
	<sy:updatePeriod>hourly</sy:updatePeriod>
	<sy:updateFrequency>1</sy:updateFrequency>
	<generator>http://wordpress.org/?v=3.5.1</generator>
	<item>
		<title>By: Magnus</title>
		<link>http://therning.org/magnus/archives/228/comment-page-1#comment-121720</link>
		<dc:creator>Magnus</dc:creator>
		<pubDate>Fri, 16 May 2008 21:28:30 +0000</pubDate>
		<guid isPermaLink="false">http://therning.org/magnus/archives/228#comment-121720</guid>
		<description><![CDATA[&lt;p&gt;@Paul, &lt;code&gt;endsWith&lt;/code&gt; is in MissingH &lt;a href=&quot;http://software.complete.org/static/missingh/doc//MissingH/Data-String-Utils.html#v%3Aendswith&quot; rel=&quot;nofollow&quot;&gt;here&lt;/a&gt;.&lt;/p&gt;
]]></description>
		<content:encoded><![CDATA[<p>@Paul, <code>endsWith</code> is in MissingH <a href="http://software.complete.org/static/missingh/doc//MissingH/Data-String-Utils.html#v%3Aendswith" rel="nofollow">here</a>.</p>
]]></content:encoded>
	</item>
	<item>
		<title>By: Paul</title>
		<link>http://therning.org/magnus/archives/228/comment-page-1#comment-121010</link>
		<dc:creator>Paul</dc:creator>
		<pubDate>Tue, 13 May 2008 13:20:50 +0000</pubDate>
		<guid isPermaLink="false">http://therning.org/magnus/archives/228#comment-121010</guid>
		<description><![CDATA[&lt;p&gt;Very helpful; but how/where is endswith defined?&lt;/p&gt;
]]></description>
		<content:encoded><![CDATA[<p>Very helpful; but how/where is endswith defined?</p>
]]></content:encoded>
	</item>
	<item>
		<title>By: Magnus</title>
		<link>http://therning.org/magnus/archives/228/comment-page-1#comment-5143</link>
		<dc:creator>Magnus</dc:creator>
		<pubDate>Sat, 09 Dec 2006 21:16:47 +0000</pubDate>
		<guid isPermaLink="false">http://therning.org/magnus/archives/228#comment-5143</guid>
		<description><![CDATA[&lt;p&gt;Taking Greg&#039;s excellent advise I&#039;ve now replaced my hand-crafted function from my original post with the following:&lt;/p&gt;

&lt;pre&gt;&lt;code&gt;listFilesR :: FilePath -&gt; IO [FilePath]
listFilesR path = do
    cur_path &lt;- getCurrentDirectory
    files &lt;- recurseDir SystemFS $ normalise $ combine cur_path path
    filterM doesFileExist files
&lt;/code&gt;&lt;/pre&gt;

&lt;p&gt;A lot shorter and nicer :-)&lt;/p&gt;
]]></description>
		<content:encoded><![CDATA[<p>Taking Greg&#8217;s excellent advise I&#8217;ve now replaced my hand-crafted function from my original post with the following:</p>

<pre><code>listFilesR :: FilePath -&gt; IO [FilePath]
listFilesR path = do
    cur_path &lt;- getCurrentDirectory
    files &lt;- recurseDir SystemFS $ normalise $ combine cur_path path
    filterM doesFileExist files
</code></pre>

<p>A lot shorter and nicer <img src='http://therning.org/magnus/wp-includes/images/smilies/icon_smile.gif' alt=':-)' class='wp-smiley' /> </p>
]]></content:encoded>
	</item>
	<item>
		<title>By: Magnus</title>
		<link>http://therning.org/magnus/archives/228/comment-page-1#comment-4989</link>
		<dc:creator>Magnus</dc:creator>
		<pubDate>Thu, 07 Dec 2006 08:55:42 +0000</pubDate>
		<guid isPermaLink="false">http://therning.org/magnus/archives/228#comment-4989</guid>
		<description><![CDATA[&lt;p&gt;Greg, thanks for the pointer. I really should start looking at MissingH &lt;em&gt;after&lt;/em&gt; I make my own implementations. If I do it before I miss a learning opportunity :-)&lt;/p&gt;
]]></description>
		<content:encoded><![CDATA[<p>Greg, thanks for the pointer. I really should start looking at MissingH <em>after</em> I make my own implementations. If I do it before I miss a learning opportunity <img src='http://therning.org/magnus/wp-includes/images/smilies/icon_smile.gif' alt=':-)' class='wp-smiley' /> </p>
]]></content:encoded>
	</item>
	<item>
		<title>By: Greg</title>
		<link>http://therning.org/magnus/archives/228/comment-page-1#comment-4910</link>
		<dc:creator>Greg</dc:creator>
		<pubDate>Tue, 05 Dec 2006 17:50:55 +0000</pubDate>
		<guid isPermaLink="false">http://therning.org/magnus/archives/228#comment-4910</guid>
		<description><![CDATA[&lt;p&gt;You should look into the MissingH.IO.HVFS.Utils module: http://quux.org:70/devel/missingh/html/MissingH-IO-HVFS-Utils.html&lt;/p&gt;
]]></description>
		<content:encoded><![CDATA[<p>You should look into the MissingH.IO.HVFS.Utils module: <a href="http://quux.org:70/devel/missingh/html/MissingH-IO-HVFS-Utils.html" rel="nofollow">http://quux.org:70/devel/missingh/html/MissingH-IO-HVFS-Utils.html</a></p>
]]></content:encoded>
	</item>
</channel>
</rss>
