diff options
| author | Benjamin Barenblat <bbaren@mit.edu> | 2017-07-23 09:50:04 -0400 |
|---|---|---|
| committer | Benjamin Barenblat <bbaren@mit.edu> | 2017-07-23 09:50:04 -0400 |
| commit | 0cccdb0ae595cd7e3e136e984ac7b95b99f71a53 (patch) | |
| tree | 491d3b13813610943c60460d3e178d3a73916346 /tests/bool.ur | |
Import urweb_20170720+dfsg.orig.tar.gz
[dgit import orig urweb_20170720+dfsg.orig.tar.gz]
Diffstat (limited to 'tests/bool.ur')
| -rw-r--r-- | tests/bool.ur | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/tests/bool.ur b/tests/bool.ur new file mode 100644 index 0000000..b7e57dc --- /dev/null +++ b/tests/bool.ur @@ -0,0 +1,8 @@ +val page = fn b => <html><body> + {cdata (case b of False => "No!" | True => "Yes!")} +</body></html> + +val main : unit -> page = fn () => <html><body> + <li><a link={page True}>True</a></li> + <li><a link={page False}>False</a></li> +</body></html> |