1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-17 16:41:17 -08:00

; * src/json.c (json_parse_object): Call make_hash_table directly.

This commit is contained in:
Mattias Engdegård 2024-04-01 17:01:07 +02:00
parent dbfe3cae2d
commit 8bddf7f93e

View file

@ -1599,8 +1599,7 @@ json_parse_object (struct json_parser *parser)
case json_object_hashtable:
{
EMACS_INT value = (parser->object_workspace_current - first) / 2;
result = CALLN (Fmake_hash_table, QCtest, Qequal, QCsize,
make_fixed_natnum (value));
result = make_hash_table (&hashtest_equal, value, Weak_None, false);
struct Lisp_Hash_Table *h = XHASH_TABLE (result);
for (size_t i = first; i < parser->object_workspace_current; i += 2)
{