Mercurial > hg > xemacs-beta
comparison src/elhash.h @ 3092:141c2920ea48
[xemacs-hg @ 2005-11-25 01:41:31 by crestani]
Incremental Garbage Collector
author | crestani |
---|---|
date | Fri, 25 Nov 2005 01:42:08 +0000 |
parents | de9952d2ed18 |
children | aa28d959af41 |
comparison
equal
deleted
inserted
replaced
3091:c22d8984148c | 3092:141c2920ea48 |
---|---|
30 #define XHASH_TABLE(x) XRECORD (x, hash_table, Lisp_Hash_Table) | 30 #define XHASH_TABLE(x) XRECORD (x, hash_table, Lisp_Hash_Table) |
31 #define wrap_hash_table(p) wrap_record (p, hash_table) | 31 #define wrap_hash_table(p) wrap_record (p, hash_table) |
32 #define HASH_TABLEP(x) RECORDP (x, hash_table) | 32 #define HASH_TABLEP(x) RECORDP (x, hash_table) |
33 #define CHECK_HASH_TABLE(x) CHECK_RECORD (x, hash_table) | 33 #define CHECK_HASH_TABLE(x) CHECK_RECORD (x, hash_table) |
34 #define CONCHECK_HASH_TABLE(x) CONCHECK_RECORD (x, hash_table) | 34 #define CONCHECK_HASH_TABLE(x) CONCHECK_RECORD (x, hash_table) |
35 | |
36 #ifdef NEW_GC | |
37 typedef struct htentry Lisp_Hash_Table_Entry; | |
38 | |
39 DECLARE_LRECORD (hash_table_entry, Lisp_Hash_Table_Entry); | |
40 | |
41 #define XHASH_TABLE_ENTRY(x) \ | |
42 XRECORD (x, hash_table_entry, Lisp_Hash_Table_Entry) | |
43 #define wrap_hash_table_entry(p) wrap_record (p, hash_table_entry) | |
44 #define HASH_TABLE_ENTRYP(x) RECORDP (x, hash_table_entry) | |
45 #define CHECK_HASH_TABLE_ENTRY(x) CHECK_RECORD (x, hash_table_entry) | |
46 #define CONCHECK_HASH_TABLE_ENTRY(x) CONCHECK_RECORD (x, hash_table_entry) | |
47 #endif /* NEW_GC */ | |
35 | 48 |
36 enum hash_table_weakness | 49 enum hash_table_weakness |
37 { | 50 { |
38 HASH_TABLE_NON_WEAK, | 51 HASH_TABLE_NON_WEAK, |
39 HASH_TABLE_KEY_WEAK, | 52 HASH_TABLE_KEY_WEAK, |