no enviornment passing around anymore in lexer, more work on lexer, import expression...
[cparser] / symbol_table.c
1 #include <config.h>
2
3 #include "symbol_table_t.h"
4 #include "adt/hash_string.h"
5 #include "adt/obst.h"
6
7 struct obstack symbol_obstack;
8
9 static inline
10 void init_symbol_table_entry(symbol_t *entry, const char *string)
11 {
12         entry->ID     = 0;
13         entry->pp_ID  = 0;
14         entry->string = string;
15 }
16
17 #define HashSet                    symbol_table_t
18 #define HashSetIterator            symbol_table_iterator_t
19 #define HashSetEntry               symbol_table_hash_entry_t
20 #define ValueType                  symbol_t*
21 #define NullValue                  NULL
22 #define DeletedValue               ((symbol_t*)-1)
23 #define KeyType                    const char *
24 #define ConstKeyType               const char *
25 #define GetKey(value)              (value)->string
26 #define InitData(this,value,key)   { (value) = (ValueType) obstack_alloc(&symbol_obstack, sizeof(symbol_t)); init_symbol_table_entry((value), key); }
27 #define Hash(this, key)            hash_string(key)
28 #define KeysEqual(this,key1,key2)  (strcmp(key1, key2) == 0)
29 #define SetRangeEmpty(ptr,size)    memset(ptr, 0, (size) * sizeof(symbol_table_hash_entry_t))
30
31 #define hashset_init            _symbol_table_init
32 #define hashset_init_size       _symbol_table_init_size
33 #define hashset_destroy         _symbol_table_destroy
34 #define hashset_insert          _symbol_table_insert
35 #define hashset_remove          _symbol_table_remove
36 #define hashset_find            _symbol_table_find
37 #define hashset_size            _symbol_table_size
38 #define hashset_iterator_init   _symbol_table_iterator_init
39 #define hashset_iterator_next   _symbol_table_iterator_next
40 #define hashset_remove_iterator _symbol_table_remove_iterator
41
42 #include "adt/hashset.c"
43
44 static symbol_table_t  symbol_table;
45
46 symbol_t *symbol_table_insert(const char *symbol)
47 {
48         return _symbol_table_insert(&symbol_table, symbol);
49 }
50
51 void init_symbol_table(void)
52 {
53         obstack_init(&symbol_obstack);
54         _symbol_table_init(&symbol_table);
55 }
56
57 void exit_symbol_table(void)
58 {
59         _symbol_table_destroy(&symbol_table);
60         obstack_free(&symbol_obstack, NULL);
61 }