equal
deleted
inserted
replaced
132 case search_init: return symbol->array_initialization; |
132 case search_init: return symbol->array_initialization; |
133 } |
133 } |
134 return NULL; |
134 return NULL; |
135 } |
135 } |
136 |
136 |
|
137 /* ARRAY '[' array_subrange_list ']' OF non_generic_type_name */ |
|
138 /* NOTE: this symbol may be used directly in implictly defined variables in VAR_TEMP!! |
|
139 * so we must consider it here too! |
|
140 */ |
|
141 void *spec_init_sperator_c::visit(array_specification_c *symbol) { |
|
142 TRACE("spec_init_sperator_c::array_spec_init_c"); |
|
143 switch (search_what) { |
|
144 case search_spec: return symbol; |
|
145 case search_init: return NULL; |
|
146 } |
|
147 return NULL; |
|
148 } |
|
149 |
137 /* enumerated_specification ASSIGN enumerated_value */ |
150 /* enumerated_specification ASSIGN enumerated_value */ |
138 void *spec_init_sperator_c::visit(enumerated_spec_init_c *symbol) { |
151 void *spec_init_sperator_c::visit(enumerated_spec_init_c *symbol) { |
139 TRACE("spec_init_sperator_c::enumerated_spec_init_c"); |
152 TRACE("spec_init_sperator_c::enumerated_spec_init_c"); |
140 switch (search_what) { |
153 switch (search_what) { |
141 case search_spec: return symbol->enumerated_specification; |
154 case search_spec: return symbol->enumerated_specification; |