stage4/generate_c/generate_c_st.cc
changeset 399 55b074ea7255
parent 392 9b88b8b6bccd
child 405 7b5d67d1aeef
child 495 8c6823fee086
equal deleted inserted replaced
398:f1f3facc59e7 399:55b074ea7255
   775     s4o.print("_");
   775     s4o.print("_");
   776     function_name->accept(*this);
   776     function_name->accept(*this);
   777     if (fdecl_mutiplicity == 2) {
   777     if (fdecl_mutiplicity == 2) {
   778       /* function being called is overloaded! */
   778       /* function being called is overloaded! */
   779       s4o.print("__");
   779       s4o.print("__");
   780       print_function_parameter_data_types_c overloaded_func_suf(&s4o);
   780       print_function_parameter_data_types_c overloaded_func_suf(&s4o, symbol->overloaded_return_type);
   781       f_decl->accept(overloaded_func_suf);
   781       f_decl->accept(overloaded_func_suf);
   782     }
   782     }
   783     s4o.print_integer(fcall_number);
   783     s4o.print_integer(fcall_number);
   784   }
   784   }
   785   else {
   785   else {
   786     function_name->accept(*this);
   786     function_name->accept(*this);
   787     if (fdecl_mutiplicity == 2) {
   787     if (fdecl_mutiplicity == 2) {
   788       /* function being called is overloaded! */
   788       /* function being called is overloaded! */
   789       s4o.print("__");
   789       s4o.print("__");
   790       print_function_parameter_data_types_c overloaded_func_suf(&s4o);
   790       print_function_parameter_data_types_c overloaded_func_suf(&s4o, symbol->overloaded_return_type);
   791       f_decl->accept(overloaded_func_suf);
   791       f_decl->accept(overloaded_func_suf);
   792     }
   792     }
   793   }
   793   }
   794   s4o.print("(");
   794   s4o.print("(");
   795   s4o.indent_right();
   795   s4o.indent_right();