aboutsummaryrefslogtreecommitdiffstats
path: root/test/src
diff options
context:
space:
mode:
Diffstat (limited to 'test/src')
-rw-r--r--test/src/json-tests.el12
1 files changed, 5 insertions, 7 deletions
diff --git a/test/src/json-tests.el b/test/src/json-tests.el
index e394583bc76..107cab89083 100644
--- a/test/src/json-tests.el
+++ b/test/src/json-tests.el
@@ -108,13 +108,11 @@
108 108
109(ert-deftest json-serialize/invalid-unicode () 109(ert-deftest json-serialize/invalid-unicode ()
110 (skip-unless (fboundp 'json-serialize)) 110 (skip-unless (fboundp 'json-serialize))
111 ;; FIXME: "out of memory" is the wrong error signal, but we don't 111 (should-error (json-serialize ["a\uDBBBb"]) :type 'wrong-type-argument)
112 ;; currently distinguish between error types when serializing. 112 (should-error (json-serialize ["u\x110000v"]) :type 'wrong-type-argument)
113 (should-error (json-serialize ["a\uDBBBb"]) :type 'json-out-of-memory) 113 (should-error (json-serialize ["u\x3FFFFFv"]) :type 'wrong-type-argument)
114 (should-error (json-serialize ["u\x110000v"]) :type 'json-out-of-memory) 114 (should-error (json-serialize ["u\xCCv"]) :type 'wrong-type-argument)
115 (should-error (json-serialize ["u\x3FFFFFv"]) :type 'json-out-of-memory) 115 (should-error (json-serialize ["u\u00C4\xCCv"]) :type 'wrong-type-argument))
116 (should-error (json-serialize ["u\xCCv"]) :type 'json-out-of-memory)
117 (should-error (json-serialize ["u\u00C4\xCCv"]) :type 'json-out-of-memory))
118 116
119(ert-deftest json-parse-string/null () 117(ert-deftest json-parse-string/null ()
120 (skip-unless (fboundp 'json-parse-string)) 118 (skip-unless (fboundp 'json-parse-string))