summaryrefslogtreecommitdiffstats
path: root/tests/010/json.tl
diff options
context:
space:
mode:
Diffstat (limited to 'tests/010/json.tl')
-rw-r--r--tests/010/json.tl14
1 files changed, 12 insertions, 2 deletions
diff --git a/tests/010/json.tl b/tests/010/json.tl
index 843b7b58..29ee2833 100644
--- a/tests/010/json.tl
+++ b/tests/010/json.tl
@@ -94,8 +94,18 @@
(get-json "false") nil
(get-json "null") null)
-(test
- (tojson #(1.0 "abc" t)) "[1,\"abc\",true]")
+(mtest
+ (tojson #(1.0 "abc" t)) "[1,\"abc\",true]"
+ (tojson "<!--") "\"<\\u0021--\""
+ (tojson "a<!--b") "\"a<\\u0021--b\""
+ (tojson "<!-") "\"<!-\""
+ (tojson "-->") "\"-\\u002D>\""
+ (tojson "a-->b") "\"a-\\u002D>b\""
+ (tojson "->") "\"->\""
+ (tojson "</") "\"</\""
+ (tojson "</scrip") "\"</scrip\""
+ (tojson "</script") "\"<\\/script\""
+ (tojson "a</scriptb") "\"a<\\/scriptb\"")
(mtest
(get-jsons "") nil