4 files changed, 9 insertions, 0 deletions
diff --git a/libtests/libtests.testcov b/libtests/libtests.testcov
index 1f006e81..21def9f3 100644
--- a/libtests/libtests.testcov
+++ b/libtests/libtests.testcov
@@ -92,3 +92,4 @@ JSON optional key 0
 JSON 16 high high 0
 JSON 16 low not after high 0
 JSON 16 dangling high 0
+JSON parse duplicate key 0
diff --git a/libtests/qtest/json_parse.test b/libtests/qtest/json_parse.test
index 6d57e92c..112da0a9 100644
--- a/libtests/qtest/json_parse.test
+++ b/libtests/qtest/json_parse.test
@@ -120,6 +120,7 @@ my @bad = (
     "stray low surrogate",      # 37
     "high high surrogate",      # 38
     "dangling high surrogate",  # 39
+    "duplicate dictionary key", # 40
     );
 
 my $i = 0;
diff --git a/libtests/qtest/json_parse/bad-40.json b/libtests/qtest/json_parse/bad-40.json
new file mode 100644
index 00000000..f60bcc11
--- /dev/null
+++ b/libtests/qtest/json_parse/bad-40.json
@@ -0,0 +1,6 @@
+{
+  "one": 1,
+  "two": 2,
+  "one": 3,
+  "four": 4
+}
diff --git a/libtests/qtest/json_parse/bad-40.out b/libtests/qtest/json_parse/bad-40.out
new file mode 100644
index 00000000..28a78bfb
--- /dev/null
+++ b/libtests/qtest/json_parse/bad-40.out
@@ -0,0 +1 @@
+exception: bad-40.json: JSON: offset 28: duplicated dictionary key