equal
deleted
inserted
replaced
168 symbol_c* type, |
168 symbol_c* type, |
169 symbol_c* value, |
169 symbol_c* value, |
170 symbol_c* fb_symbol = NULL, |
170 symbol_c* fb_symbol = NULL, |
171 symbol_c* fb_value = NULL) { |
171 symbol_c* fb_value = NULL) { |
172 |
172 |
173 unsigned int vartype = search_varfb_instance_type->get_vartype(symbol); |
173 bool type_is_complex = false; |
174 bool type_is_complex = search_varfb_instance_type->type_is_complex(); |
174 if (fb_symbol == NULL) { |
175 if (vartype == search_var_instance_decl_c::external_vt) |
175 unsigned int vartype = search_varfb_instance_type->get_vartype(symbol); |
176 s4o.print(SET_EXTERNAL); |
176 type_is_complex = search_varfb_instance_type->type_is_complex(); |
177 else if (vartype == search_var_instance_decl_c::located_vt) |
177 if (vartype == search_var_instance_decl_c::external_vt) |
178 s4o.print(SET_LOCATED); |
178 s4o.print(SET_EXTERNAL); |
|
179 else if (vartype == search_var_instance_decl_c::located_vt) |
|
180 s4o.print(SET_LOCATED); |
|
181 else |
|
182 s4o.print(SET_VAR); |
|
183 } |
179 else |
184 else |
180 s4o.print(SET_VAR); |
185 s4o.print(SET_VAR); |
181 s4o.print("("); |
186 s4o.print("("); |
182 |
187 |
183 if (fb_symbol != NULL) { |
188 if (fb_symbol != NULL) { |
184 print_variable_prefix(); |
189 print_variable_prefix(); |
185 fb_symbol->accept(*this); |
190 fb_symbol->accept(*this); |