From afa71d10ce2fcacd756f64c9df28e24a1a47f1a4 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Mattias=20Engdeg=C3=A5rd?= Date: Mon, 1 Apr 2024 17:01:07 +0200 Subject: [PATCH] ; * src/json.c (json_parse_object): Call make_hash_table directly. (cherry picked from commit 8bddf7f93e671bccec8103cecd99629bcc05f071) --- src/json.c | 3 +-- 1 file changed, 1 insertion(+), 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) 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) { -- 2.39.5