960 s4o.print("_"); |
960 s4o.print("_"); |
961 function_name->accept(*this); |
961 function_name->accept(*this); |
962 if (fdecl_mutiplicity == 2) { |
962 if (fdecl_mutiplicity == 2) { |
963 /* function being called is overloaded! */ |
963 /* function being called is overloaded! */ |
964 s4o.print("__"); |
964 s4o.print("__"); |
965 print_function_parameter_data_types_c overloaded_func_suf(&s4o); |
965 print_function_parameter_data_types_c overloaded_func_suf(&s4o, symbol->overloaded_return_type); |
966 f_decl->accept(overloaded_func_suf); |
966 f_decl->accept(overloaded_func_suf); |
967 } |
967 } |
968 s4o.print_integer(fcall_number); |
968 s4o.print_integer(fcall_number); |
969 } |
969 } |
970 else { |
970 else { |
971 if (function_name != NULL) { |
971 if (function_name != NULL) { |
972 function_name->accept(*this); |
972 function_name->accept(*this); |
973 if (fdecl_mutiplicity == 2) { |
973 if (fdecl_mutiplicity == 2) { |
974 /* function being called is overloaded! */ |
974 /* function being called is overloaded! */ |
975 s4o.print("__"); |
975 s4o.print("__"); |
976 print_function_parameter_data_types_c overloaded_func_suf(&s4o); |
976 print_function_parameter_data_types_c overloaded_func_suf(&s4o, symbol->overloaded_return_type); |
977 f_decl->accept(overloaded_func_suf); |
977 f_decl->accept(overloaded_func_suf); |
978 } |
978 } |
979 } |
979 } |
980 if (function_type_suffix != NULL) |
980 if (function_type_suffix != NULL) |
981 function_type_suffix->accept(*this); |
981 function_type_suffix->accept(*this); |
1368 s4o.print("_"); |
1368 s4o.print("_"); |
1369 function_name->accept(*this); |
1369 function_name->accept(*this); |
1370 if (fdecl_mutiplicity == 2) { |
1370 if (fdecl_mutiplicity == 2) { |
1371 /* function being called is overloaded! */ |
1371 /* function being called is overloaded! */ |
1372 s4o.print("__"); |
1372 s4o.print("__"); |
1373 print_function_parameter_data_types_c overloaded_func_suf(&s4o); |
1373 print_function_parameter_data_types_c overloaded_func_suf(&s4o, symbol->overloaded_return_type); |
1374 f_decl->accept(overloaded_func_suf); |
1374 f_decl->accept(overloaded_func_suf); |
1375 } |
1375 } |
1376 s4o.print_integer(fcall_number); |
1376 s4o.print_integer(fcall_number); |
1377 } |
1377 } |
1378 else { |
1378 else { |
1379 if (function_name != NULL) { |
1379 if (function_name != NULL) { |
1380 function_name->accept(*this); |
1380 function_name->accept(*this); |
1381 if (fdecl_mutiplicity == 2) { |
1381 if (fdecl_mutiplicity == 2) { |
1382 /* function being called is overloaded! */ |
1382 /* function being called is overloaded! */ |
1383 s4o.print("__"); |
1383 s4o.print("__"); |
1384 print_function_parameter_data_types_c overloaded_func_suf(&s4o); |
1384 print_function_parameter_data_types_c overloaded_func_suf(&s4o, symbol->overloaded_return_type); |
1385 f_decl->accept(overloaded_func_suf); |
1385 f_decl->accept(overloaded_func_suf); |
1386 } |
1386 } |
1387 } |
1387 } |
1388 if (function_type_suffix != NULL) |
1388 if (function_type_suffix != NULL) |
1389 function_type_suffix->accept(*this); |
1389 function_type_suffix->accept(*this); |