567     function_call_param_iterator_c function_call_param_iterator(symbol);

   567     function_call_param_iterator_c function_call_param_iterator(symbol);

   568     

   568     

   569     int nb_param = 1;

   569     int nb_param = 1;

   570     if (symbol->il_operand_list != NULL)

   570     if (symbol->il_operand_list != NULL)

   571       nb_param += ((list_c *)symbol->il_operand_list)->n;

   571       nb_param += ((list_c *)symbol->il_operand_list)->n;

   573     for(int current_param = 0; current_param < nb_param; current_param++) {

   576     for(int current_param = 0; current_param < nb_param; current_param++) {

   574       symbol_c *param_value;

   577       symbol_c *param_value;

   575       if (current_param == 0)

   578       if (current_param == 0)

   576         param_value = &this->default_variable_name;

   579         param_value = &this->default_variable_name;

   577       else {

   580       else {

   602           else ERROR;

   605           else ERROR;

   603           break;

   606           break;

   604         default: ERROR;

   607         default: ERROR;

   605       }

   608       }

   606     } /* for(...) */

   609     } /* for(...) */

   608     /* the data type returned by the function, and stored in the il default variable... */

   612     /* the data type returned by the function, and stored in the il default variable... */

   609     default_variable_name.current_type = return_data_type;

   613     default_variable_name.current_type = return_data_type;

   610   }

   614   }

   611   else {

   615   else {

   612     /* determine the base data type returned by the function being called... */

   616     /* determine the base data type returned by the function being called... */