aboutsummaryrefslogtreecommitdiffstats
path: root/src/json.c
diff options
context:
space:
mode:
authorPip Cet2024-08-20 19:04:44 +0000
committerStefan Kangas2024-12-12 22:48:12 +0100
commitafd61deaaeb5e5e6845bdf995ac5ee9a3479599c (patch)
treea13e37e2a5ad40374959fe263ebb4e2a8a484ed2 /src/json.c
parente1e101c6c10b6e5110c2c47946d477a752828a78 (diff)
downloademacs-afd61deaaeb5e5e6845bdf995ac5ee9a3479599c.tar.gz
emacs-afd61deaaeb5e5e6845bdf995ac5ee9a3479599c.zip
Pure storage removal: Remove purecopy hash table flag
* lisp/emacs-liqsp/comp.el (comp--jump-table-optimizable): Adjust comment. * src/category.c (hash_get_category_set): * src/emacs-module.c (syms_of_module): * src/fns.c (make_hash_table): Remove 'purecopy' flag and update docstring. (Fmake_hash_table): Ignore ':purecopy' argument. * src/frame.c (make_frame): * src/image.c (xpm_make_color_table_h): * src/lisp.h (struct Lisp_Hash_Table): Drop 'purecopy' flag. * src/pdumper.c (dump_hash_table): Don't dump 'purecopy' flag. * src/print.c (print_object): Don't print 'purecopy' flag * src/json.c (json_parse_object): * src/lread.c (readevalloop, read_internal_start): * src/pgtkterm.c (syms_of_pgtkterm): * src/profiler.c (export_log): * src/xfaces.c (syms_of_xfaces): * src/xterm.c (syms_of_xterm): Adjust calls to 'make_hash_table'.
Diffstat (limited to 'src/json.c')
-rw-r--r--src/json.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/json.c b/src/json.c
index 282dca6e8ff..bfdf7af0ab0 100644
--- a/src/json.c
+++ b/src/json.c
@@ -1564,7 +1564,7 @@ json_parse_object (struct json_parser *parser)
1564 case json_object_hashtable: 1564 case json_object_hashtable:
1565 { 1565 {
1566 EMACS_INT value = (parser->object_workspace_current - first) / 2; 1566 EMACS_INT value = (parser->object_workspace_current - first) / 2;
1567 result = make_hash_table (&hashtest_equal, value, Weak_None, false); 1567 result = make_hash_table (&hashtest_equal, value, Weak_None);
1568 struct Lisp_Hash_Table *h = XHASH_TABLE (result); 1568 struct Lisp_Hash_Table *h = XHASH_TABLE (result);
1569 for (size_t i = first; i < parser->object_workspace_current; i += 2) 1569 for (size_t i = first; i < parser->object_workspace_current; i += 2)
1570 { 1570 {