diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/json.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/json.c b/src/json.c index c64d44b4bac..486253581ff 100644 --- a/src/json.c +++ b/src/json.c | |||
| @@ -1599,8 +1599,7 @@ json_parse_object (struct json_parser *parser) | |||
| 1599 | case json_object_hashtable: | 1599 | case json_object_hashtable: |
| 1600 | { | 1600 | { |
| 1601 | EMACS_INT value = (parser->object_workspace_current - first) / 2; | 1601 | EMACS_INT value = (parser->object_workspace_current - first) / 2; |
| 1602 | result = CALLN (Fmake_hash_table, QCtest, Qequal, QCsize, | 1602 | result = make_hash_table (&hashtest_equal, value, Weak_None, false); |
| 1603 | make_fixed_natnum (value)); | ||
| 1604 | struct Lisp_Hash_Table *h = XHASH_TABLE (result); | 1603 | struct Lisp_Hash_Table *h = XHASH_TABLE (result); |
| 1605 | for (size_t i = first; i < parser->object_workspace_current; i += 2) | 1604 | for (size_t i = first; i < parser->object_workspace_current; i += 2) |
| 1606 | { | 1605 | { |