[pure-lang-svn] SF.net SVN: pure-lang:[714] pure/trunk/lib/prelude.pure
Status: Beta
Brought to you by:
agraef
From: <ag...@us...> - 2008-09-05 09:52:20
|
Revision: 714 http://pure-lang.svn.sourceforge.net/pure-lang/?rev=714&view=rev Author: agraef Date: 2008-09-05 09:52:31 +0000 (Fri, 05 Sep 2008) Log Message: ----------- Comment change. Modified Paths: -------------- pure/trunk/lib/prelude.pure Modified: pure/trunk/lib/prelude.pure =================================================================== --- pure/trunk/lib/prelude.pure 2008-09-05 09:51:32 UTC (rev 713) +++ pure/trunk/lib/prelude.pure 2008-09-05 09:52:31 UTC (rev 714) @@ -440,7 +440,7 @@ lazy in Pure, because it's also used for arithmetic operations. Using it here would make foldr (and hence cat) eager. Therefore we use our own concatenation operation here, which properly deals with the case that ys - is an infinite stream. */ + is an infinite stream when applied recursively. */ []+ys = ys; xs@(_:_)+ys = tick [] xs ys; tick zs (x:xs) ys = tack (x:zs) ((xs+ys)&) if thunkp xs; This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site. |