stage4/generate_c/generate_c_il.cc
changeset 406 6381589697ff
parent 405 7b5d67d1aeef
child 410 c6486bd97392
child 498 0637a4490c8c
equal deleted inserted replaced
405:7b5d67d1aeef 406:6381589697ff
   966     s4o.print("_");
   966     s4o.print("_");
   967     function_name->accept(*this);
   967     function_name->accept(*this);
   968     if (fdecl_mutiplicity == 2) {
   968     if (fdecl_mutiplicity == 2) {
   969       /* function being called is overloaded! */
   969       /* function being called is overloaded! */
   970       s4o.print("__");
   970       s4o.print("__");
   971       print_function_parameter_data_types_c overloaded_func_suf(&s4o, symbol->overloaded_return_type);
   971       print_function_parameter_data_types_c overloaded_func_suf(&s4o);
   972       f_decl->accept(overloaded_func_suf);
   972       f_decl->accept(overloaded_func_suf);
   973     }
   973     }
   974     s4o.print_integer(fcall_number);
   974     s4o.print_integer(fcall_number);
   975   }
   975   }
   976   else {
   976   else {
   977     if (function_name != NULL) {
   977     if (function_name != NULL) {
   978           function_name->accept(*this);
   978           function_name->accept(*this);
   979           if (fdecl_mutiplicity == 2) {
   979           if (fdecl_mutiplicity == 2) {
   980             /* function being called is overloaded! */
   980             /* function being called is overloaded! */
   981             s4o.print("__");
   981             s4o.print("__");
   982             print_function_parameter_data_types_c overloaded_func_suf(&s4o, symbol->overloaded_return_type);
   982             print_function_parameter_data_types_c overloaded_func_suf(&s4o);
   983             f_decl->accept(overloaded_func_suf);
   983             f_decl->accept(overloaded_func_suf);
   984           }
   984           }
   985     }	  
   985     }	  
   986     if (function_type_suffix != NULL)
   986     if (function_type_suffix != NULL)
   987       function_type_suffix->accept(*this);
   987       function_type_suffix->accept(*this);
  1374     s4o.print("_");
  1374     s4o.print("_");
  1375     function_name->accept(*this);
  1375     function_name->accept(*this);
  1376     if (fdecl_mutiplicity == 2) {
  1376     if (fdecl_mutiplicity == 2) {
  1377       /* function being called is overloaded! */
  1377       /* function being called is overloaded! */
  1378       s4o.print("__");
  1378       s4o.print("__");
  1379       print_function_parameter_data_types_c overloaded_func_suf(&s4o, symbol->overloaded_return_type);
  1379       print_function_parameter_data_types_c overloaded_func_suf(&s4o);
  1380       f_decl->accept(overloaded_func_suf);
  1380       f_decl->accept(overloaded_func_suf);
  1381     }
  1381     }
  1382     s4o.print_integer(fcall_number);
  1382     s4o.print_integer(fcall_number);
  1383   }
  1383   }
  1384   else {
  1384   else {
  1385     if (function_name != NULL) {
  1385     if (function_name != NULL) {
  1386       function_name->accept(*this);
  1386       function_name->accept(*this);
  1387       if (fdecl_mutiplicity == 2) {
  1387       if (fdecl_mutiplicity == 2) {
  1388         /* function being called is overloaded! */
  1388         /* function being called is overloaded! */
  1389         s4o.print("__");
  1389         s4o.print("__");
  1390         print_function_parameter_data_types_c overloaded_func_suf(&s4o, symbol->overloaded_return_type);
  1390         print_function_parameter_data_types_c overloaded_func_suf(&s4o);
  1391         f_decl->accept(overloaded_func_suf);
  1391         f_decl->accept(overloaded_func_suf);
  1392       }
  1392       }
  1393     }  
  1393     }  
  1394     if (function_type_suffix != NULL)
  1394     if (function_type_suffix != NULL)
  1395       function_type_suffix->accept(*this);
  1395       function_type_suffix->accept(*this);