3 #include "symbol_table_t.h"
4 #include "adt/hash_string.h"
7 struct obstack symbol_obstack;
10 void init_symbol_table_entry(symbol_t *entry, const char *string)
13 entry->string = string;
16 #define HashSet symbol_table_t
17 #define HashSetIterator symbol_table_iterator_t
18 #define HashSetEntry symbol_table_hash_entry_t
19 #define ValueType symbol_t*
20 #define NullValue NULL
21 #define DeletedValue ((symbol_t*)-1)
22 #define KeyType const char *
23 #define ConstKeyType const char *
24 #define GetKey(value) (value)->string
25 #define InitData(this,value,key) { (value) = (ValueType) obstack_alloc(&symbol_obstack, sizeof(symbol_t)); init_symbol_table_entry((value), key); }
26 #define Hash(this, key) hash_string(key)
27 #define KeysEqual(this,key1,key2) (strcmp(key1, key2) == 0)
28 #define SetRangeEmpty(ptr,size) memset(ptr, 0, (size) * sizeof(symbol_table_hash_entry_t))
30 #define hashset_init _symbol_table_init
31 #define hashset_init_size _symbol_table_init_size
32 #define hashset_destroy _symbol_table_destroy
33 #define hashset_insert _symbol_table_insert
34 #define hashset_remove _symbol_table_remove
35 #define hashset_find _symbol_table_find
36 #define hashset_size _symbol_table_size
37 #define hashset_iterator_init _symbol_table_iterator_init
38 #define hashset_iterator_next _symbol_table_iterator_next
39 #define hashset_remove_iterator _symbol_table_remove_iterator
41 #include "adt/hashset.c"
43 static symbol_table_t symbol_table;
44 static symbol_table_t preprocessor_symbol_table;
46 symbol_t *symbol_table_insert(const char *symbol)
48 return _symbol_table_insert(&symbol_table, symbol);
51 symbol_t *preprocessor_symbol_table_insert(const char *symbol)
53 return _symbol_table_insert(&preprocessor_symbol_table, symbol);
56 void init_symbol_table(void)
58 obstack_init(&symbol_obstack);
59 _symbol_table_init(&symbol_table);
60 _symbol_table_init(&preprocessor_symbol_table);
63 void exit_symbol_table(void)
65 _symbol_table_destroy(&symbol_table);
66 _symbol_table_destroy(&preprocessor_symbol_table);
67 obstack_free(&symbol_obstack, NULL);