diff options
| author |  Adam Chlipala <adam@chlipala.net> | 2012-09-14 06:44:14 -0400 |
|---|---|---|
| committer | Adam Chlipala <adam@chlipala.net> | 2012-09-14 06:44:14 -0400 |
| commit | 1d8ba11549f4aa8cac67b4e1111648e978229689 (patch) | |
| tree | f5a7d81493641fce962eefd49a1dc15b75594a80 /tests/badInline.ur | |
| parent | 75aff135eda72ac345466c3b273290e7a01cedda (diff) | |
| parent | 0ce7847026a7be88c3cde012c5f74d69d682a491 (diff) | |
Merge
Diffstat (limited to 'tests/badInline.ur')
| -rw-r--r-- | tests/badInline.ur | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/tests/badInline.ur b/tests/badInline.ur new file mode 100644 index 00000000..bfbdba79 --- /dev/null +++ b/tests/badInline.ur @@ -0,0 +1,12 @@ +style s1 +style s2 +style s3 + +fun ifClass r cls c = if r then classes cls c else c + +fun main (n : int) : transaction page = return <xml><body> + <p class={ifClass (n = 0) s1 + (ifClass (n = 1) s2 + (ifClass (n = 2) s3 + null))}>Hi</p> +</body></xml> |