Mercurial > urweb

diff tests/hog.ur @ 1307:d2ad997ca157

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Interface for setting memory limits
author Adam Chlipala <adam@chlipala.net>
date Thu, 14 Oct 2010 11:06:26 -0400
parents
children a1aa62b472cf
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/tests/hog.ur	Thu Oct 14 11:06:26 2010 -0400
@@ -0,0 +1,7 @@
+fun more n =
+    if n <= 0 then
+        "!"
+    else
+        more (n-1) ^ more (n-1)
+
+fun main n = return <xml>{[more n]}</xml>