aboutsummaryrefslogtreecommitdiffstats
path: root/src/lisp.h
diff options
context:
space:
mode:
authorStefan Monnier2007-06-29 03:48:22 +0000
committerStefan Monnier2007-06-29 03:48:22 +0000
commit6c661ec965ca0f1c9cf2b7e33ebe85eabef2e6fb (patch)
tree647ee14d8e5675af3f8cff86cefdb387c6973ecc /src/lisp.h
parent2706ceb633bedd382772741c0b73baef116d8eda (diff)
downloademacs-6c661ec965ca0f1c9cf2b7e33ebe85eabef2e6fb.tar.gz
emacs-6c661ec965ca0f1c9cf2b7e33ebe85eabef2e6fb.zip
* fns.c (weak_hash_tables): Rename from Vweak_hash_tables and change its type.
(make_hash_table, copy_hash_table, sweep_weak_hash_tables, init_fns): Update to the new type of weak_hash_tables and next_weak. * lisp.h (struct Lisp_Hash_Table): Change next_weak from Lisp_Object to a plain C pointer to Lisp_Hash_Table.
Diffstat (limited to 'src/lisp.h')
-rw-r--r--src/lisp.h8
1 files changed, 4 insertions, 4 deletions
diff --git a/src/lisp.h b/src/lisp.h
index c8ca4c49ec6..9f144c4c973 100644
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -1026,16 +1026,16 @@ struct Lisp_Hash_Table
1026 hash table size to reduce collisions. */ 1026 hash table size to reduce collisions. */
1027 Lisp_Object index; 1027 Lisp_Object index;
1028 1028
1029 /* Next weak hash table if this is a weak hash table. The head
1030 of the list is in Vweak_hash_tables. */
1031 Lisp_Object next_weak;
1032
1033 /* User-supplied hash function, or nil. */ 1029 /* User-supplied hash function, or nil. */
1034 Lisp_Object user_hash_function; 1030 Lisp_Object user_hash_function;
1035 1031
1036 /* User-supplied key comparison function, or nil. */ 1032 /* User-supplied key comparison function, or nil. */
1037 Lisp_Object user_cmp_function; 1033 Lisp_Object user_cmp_function;
1038 1034
1035 /* Next weak hash table if this is a weak hash table. The head
1036 of the list is in weak_hash_tables. */
1037 struct Lisp_Hash_Table *next_weak;
1038
1039 /* C function to compare two keys. */ 1039 /* C function to compare two keys. */
1040 int (* cmpfn) P_ ((struct Lisp_Hash_Table *, Lisp_Object, 1040 int (* cmpfn) P_ ((struct Lisp_Hash_Table *, Lisp_Object,
1041 unsigned, Lisp_Object, unsigned)); 1041 unsigned, Lisp_Object, unsigned));