equal
deleted
inserted
replaced
253 int dimension; |
253 int dimension; |
254 switch (current_typedefinition) { |
254 switch (current_typedefinition) { |
255 case array_td: |
255 case array_td: |
256 if (current_basetypedeclaration == arraysubrange_bd) { |
256 if (current_basetypedeclaration == arraysubrange_bd) { |
257 s4o_incl.print("["); |
257 s4o_incl.print("["); |
258 dimension = extract_integer(symbol->upper_limit) - extract_integer(symbol->lower_limit) + 1; |
258 dimension = extract_integer_value(symbol->upper_limit) - extract_integer_value(symbol->lower_limit) + 1; |
259 print_integer_incl(dimension); |
259 print_integer_incl(dimension); |
260 s4o_incl.print("]"); |
260 s4o_incl.print("]"); |
261 } |
261 } |
262 else |
262 else |
263 symbol->lower_limit->accept(*this); |
263 symbol->lower_limit->accept(*this); |