emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 8bddf7f93e6 2/3: ; * src/json.c (json_parse_object): Call make_ha


From: Mattias Engdegård
Subject: master 8bddf7f93e6 2/3: ; * src/json.c (json_parse_object): Call make_hash_table directly.
Date: Mon, 1 Apr 2024 11:07:29 -0400 (EDT)

branch: master
commit 8bddf7f93e671bccec8103cecd99629bcc05f071
Author: Mattias Engdegård <mattiase@acm.org>
Commit: Mattias Engdegård <mattiase@acm.org>

    ; * src/json.c (json_parse_object): Call make_hash_table directly.
---
 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)
          {



reply via email to

[Prev in Thread] Current Thread [Next in Thread]