[pure-lang-svn] SF.net SVN: pure-lang: [11] pure/trunk/test

[<ag...@us...>]

Revision: 11
          http://pure-lang.svn.sourceforge.net/pure-lang/?rev=11&view=rev
Author:   agraef
Date:     2008-04-30 23:52:46 -0700 (Wed, 30 Apr 2008)

Log Message:
-----------
Added regressions reported by Tim Haynes.

Added Paths:
-----------
    pure/trunk/test/test5.pure
    pure/trunk/test/test6.pure

Added: pure/trunk/test/test5.pure
===================================================================
--- pure/trunk/test/test5.pure	                        (rev 0)
+++ pure/trunk/test/test5.pure	2008-05-01 06:52:46 UTC (rev 11)
@@ -0,0 +1,4 @@
+fact 0 = 1;
+fact n = n * fact (n-1);
+fact 4;
+

Added: pure/trunk/test/test6.pure
===================================================================
--- pure/trunk/test/test6.pure	                        (rev 0)
+++ pure/trunk/test/test6.pure	2008-05-01 06:52:46 UTC (rev 11)
@@ -0,0 +1,3 @@
+fact n = 1 if n==0;
+       = n * fact (n-1) otherwise;
+fact 4;


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.