| 77 | // |
| 78 | |
| 79 | void HSH_init() |
| 80 | { |
| 81 | //const char *string; |
| 82 | |
| 83 | int i = 0; |
| 84 | for (gpre_sym** ptr = hash_table; i < HASH_SIZE; i++) |
| 85 | *ptr++ = NULL; |
| 86 | |
| 87 | fflush(stdout); |
| 88 | const word* a_word; |
| 89 | for (i = 0, a_word = keywords; i < FB_NELEM(keywords); i++, a_word++) |
| 90 | { |
| 91 | // Unused code: SYM_LEN is used always. |
| 92 | //for (string = a_word->keyword; *string; string++); |
| 93 | gpre_sym* symbol = (gpre_sym*) MSC_alloc(SYM_LEN); |
| 94 | symbol->sym_type = SYM_keyword; |
| 95 | symbol->sym_string = a_word->keyword; |
| 96 | symbol->sym_keyword = (int) a_word->id; |
| 97 | HSH_insert(symbol); |
| 98 | symbol->sym_object = (gpre_ctx*) key_symbols; |
| 99 | key_symbols = symbol; |
| 100 | } |
| 101 | } |
| 102 | |
| 103 | |
| 104 | //____________________________________________________________ |
no test coverage detected