diff demo/rec.ur @ 407:345fcf91c806

Rec demo
author Adam Chlipala <adamc@hcoop.net>
date Tue, 21 Oct 2008 17:34:20 -0400
parents
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/demo/rec.ur	Tue Oct 21 17:34:20 2008 -0400
@@ -0,0 +1,7 @@
+fun main () = return <xml><body>
+  <a link={other ()}>Go to the other one!</a>
+</body></xml>
+
+and other () = return <xml><body>
+  <a link={main ()}>Return to <tt>main</tt>!</a>
+</body></xml>