equal
deleted
inserted
replaced
122 |
122 |
123 /********************************/ |
123 /********************************/ |
124 /* B 1.3.3 - Derived data types */ |
124 /* B 1.3.3 - Derived data types */ |
125 /********************************/ |
125 /********************************/ |
126 void *search_constant_type_c::visit(enumerated_value_c *symbol) { |
126 void *search_constant_type_c::visit(enumerated_value_c *symbol) { |
127 if (symbol->type != NULL) |
127 if (symbol->type != NULL) |
128 return (void *)(symbol->type); |
128 return (void *)(symbol->type); |
129 |
129 |
130 symbol_c *value_type = enumerated_value_symtable.find_value(symbol->value); |
130 symbol_c *value_type = enumerated_value_symtable.find_value(symbol->value); |
131 if (value_type == enumerated_value_symtable.end_value()) ERROR; |
131 if (value_type == enumerated_value_symtable.end_value()) |
132 |
132 return NULL; |
133 return (void *)value_type; |
133 return (void *)value_type; |
134 } |
134 } |
135 |
135 |
136 real_type_name_c search_constant_type_c::real_type_name; |
136 real_type_name_c search_constant_type_c::real_type_name; |
137 sint_type_name_c search_constant_type_c::sint_type_name; |
137 sint_type_name_c search_constant_type_c::sint_type_name; |
138 lint_type_name_c search_constant_type_c::lint_type_name; |
138 lint_type_name_c search_constant_type_c::lint_type_name; |