diff options
| author |  Adam Chlipala <adam@chlipala.net> | 2012-04-28 11:35:12 -0400 |
|---|---|---|
| committer | Adam Chlipala <adam@chlipala.net> | 2012-04-28 11:35:12 -0400 |
| commit | 79655cfc46cd36b6c52038cacb33ea5d5adac0fe (patch) | |
| tree | 860fa2e6a12e0d8034dc49a91701a8564a5202de /tests/urlifyVariant.ur | |
| parent | 4b4301a132b8d1144ed08c79b2ad918d70d5d37c (diff) | |
Fix urlification of recursive polymorphic variants
Diffstat (limited to 'tests/urlifyVariant.ur')
| -rw-r--r-- | tests/urlifyVariant.ur | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/tests/urlifyVariant.ur b/tests/urlifyVariant.ur new file mode 100644 index 00000000..aba162d3 --- /dev/null +++ b/tests/urlifyVariant.ur @@ -0,0 +1,5 @@ +datatype t = T of variant [A = t] + +fun main (x : t) : transaction page = return <xml><body> + <a link={main x}>Go</a> +</body></xml> |