changeset 379:2b604ae76611

Link demo
author Adam Chlipala <adamc@hcoop.net>
date Sun, 19 Oct 2008 12:50:49 -0400
parents 168667cdaa95
children 758304561b60
files demo/link.ur demo/link.urp demo/link.urs
diffstat 3 files changed, 10 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/demo/link.ur	Sun Oct 19 12:50:49 2008 -0400
@@ -0,0 +1,7 @@
+fun target () = return <xml><body>
+  Welcome!
+</body></xml>
+
+fun main () = return <xml><body>
+  <a link={target ()}>Go there</a>
+</body></xml>
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/demo/link.urp	Sun Oct 19 12:50:49 2008 -0400
@@ -0,0 +1,2 @@
+
+link
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/demo/link.urs	Sun Oct 19 12:50:49 2008 -0400
@@ -0,0 +1,1 @@
+val main : unit -> transaction page