diff options
author | Adam Chlipala <adamc@hcoop.net> | 2008-10-21 13:24:54 -0400 |
---|---|---|
committer | Adam Chlipala <adamc@hcoop.net> | 2008-10-21 13:24:54 -0400 |
commit | ac6a32c651d76d10650fffb99f77f05c583ff0cf (patch) | |
tree | e9764619179aa37aef1cdfa46612020e176c1a1d /tests | |
parent | a23f12953a60c8f8d663266a9644a08a905b7b36 (diff) |
Simple listShop working
Diffstat (limited to 'tests')
-rw-r--r-- | tests/unurlify.ur | 7 | ||||
-rw-r--r-- | tests/unurlify.urp | 3 |
2 files changed, 10 insertions, 0 deletions
diff --git a/tests/unurlify.ur b/tests/unurlify.ur new file mode 100644 index 00000000..4bb523c1 --- /dev/null +++ b/tests/unurlify.ur @@ -0,0 +1,7 @@ +datatype list t = Nil | Cons of t * list t + +fun handler (ls : list bool) = return <xml/> + +fun main () : transaction page = return <xml><body> + <a link={handler Nil}>!</a> +</body></xml> diff --git a/tests/unurlify.urp b/tests/unurlify.urp new file mode 100644 index 00000000..d1e2b8e6 --- /dev/null +++ b/tests/unurlify.urp @@ -0,0 +1,3 @@ +debug + +unurlify |