stage4/generate_c/generate_c_st.cc
changeset 309 f93bcada0f51
parent 302 d120740a6b58
child 321 a96399ab57c2
equal deleted inserted replaced
308:833cb2eba36f 309:f93bcada0f51
   337 /* subscript_list ',' subscript */
   337 /* subscript_list ',' subscript */
   338 void *visit(subscript_list_c *symbol) {
   338 void *visit(subscript_list_c *symbol) {
   339   for (int i =  0; i < symbol->n; i++) {
   339   for (int i =  0; i < symbol->n; i++) {
   340     s4o.print("[__");
   340     s4o.print("[__");
   341     current_array_type->accept(*this);
   341     current_array_type->accept(*this);
   342     s4o.print("_TRANSIDX");
   342     s4o.print("_TRANSIDX(");
   343     print_integer(i);
   343     print_integer(i);
   344     s4o.print("(");
   344     s4o.print(",");
   345     symbol->elements[i]->accept(*this);
   345     symbol->elements[i]->accept(*this);
   346     s4o.print(")]");
   346     s4o.print(")]");
   347   }
   347   }
   348   return NULL;
   348   return NULL;
   349 }
   349 }