summaryrefslogtreecommitdiff
path: root/demo/listShop.ur
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adamc@hcoop.net>2008-10-21 12:06:35 -0400
committerGravatar Adam Chlipala <adamc@hcoop.net>2008-10-21 12:06:35 -0400
commita23f12953a60c8f8d663266a9644a08a905b7b36 (patch)
tree017e4ed05769d4fff43b3ecfef4cef440d68653a /demo/listShop.ur
parentcd8ba90217f6ed7efbf4882b4dcd8e199e510fbb (diff)
ListShop skeleton
Diffstat (limited to 'demo/listShop.ur')
-rw-r--r--demo/listShop.ur16
1 files changed, 16 insertions, 0 deletions
diff --git a/demo/listShop.ur b/demo/listShop.ur
new file mode 100644
index 00000000..04386349
--- /dev/null
+++ b/demo/listShop.ur
@@ -0,0 +1,16 @@
+structure I = struct
+ type t = int
+end
+
+structure S = struct
+ type t = string
+end
+
+structure IL = ListFun.Make(I)
+structure SL = ListFun.Make(S)
+
+fun main () = return <xml><body>
+ Pick your poison:<br/>
+ <li> <a link={IL.main ()}>Integers</a></li>
+ <li> <a link={SL.main ()}>Strings</a></li>
+</body></xml>