aboutsummaryrefslogtreecommitdiffhomepage
path: root/tests
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adamc@hcoop.net>2008-07-17 13:33:56 -0400
committerGravatar Adam Chlipala <adamc@hcoop.net>2008-07-17 13:33:56 -0400
commit2e00cd0bdfadfab33a3c802994c8c0e5cf565174 (patch)
treee468f73f825fba86812b997da7f918a261ef30ef /tests
parent1676fa257dfb1f2569d6ffcdb1aea4c5a50dbae1 (diff)
Proper escaping of cdata
Diffstat (limited to 'tests')
-rw-r--r--tests/cdataF.lac8
1 files changed, 8 insertions, 0 deletions
diff --git a/tests/cdataF.lac b/tests/cdataF.lac
new file mode 100644
index 00000000..3f8da45b
--- /dev/null
+++ b/tests/cdataF.lac
@@ -0,0 +1,8 @@
+val snippet = fn s => <body>
+ <h1>{cdata s}</h1>
+</body>
+
+val main = fn () => <html><body>
+ {snippet "<Hi."}
+ {snippet "Bye."}
+</body></html>