stage4/generate_c/generate_c_st.cc
changeset 101 fd9abc64c43c
parent 98 d0cdf1d00b74
child 123 a9b4af71cfa4
equal deleted inserted replaced
100:ab431470e098 101:fd9abc64c43c
   616     s4o.print("(");
   616     s4o.print("(");
   617   }
   617   }
   618   symbol->r_exp->accept(*this);
   618   symbol->r_exp->accept(*this);
   619   if (search_base_type.base_is_subrange())
   619   if (search_base_type.base_is_subrange())
   620     s4o.print(")");
   620     s4o.print(")");
   621   s4o.print("; // ");
       
   622   left_type->accept(*this);
       
   623   s4o.print(" ");
       
   624   base_type->accept(*this);
       
   625   return NULL;
   621   return NULL;
   626 }
   622 }
   627 
   623 
   628 /*****************************************/
   624 /*****************************************/
   629 /* B 3.2.2 Subprogram Control Statements */
   625 /* B 3.2.2 Subprogram Control Statements */