Mercurial > urweb
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>