stage4/generate_c/generate_c_st.cc
changeset 762 a3d917474ae4
parent 721 5dc33058e041
child 793 268bf4ca5fa1
equal deleted inserted replaced
761:7b52623a2f37 762:a3d917474ae4
   750       case function_param_iterator_c::direction_in:
   750       case function_param_iterator_c::direction_in:
   751         if (nb_param > 0)
   751         if (nb_param > 0)
   752           s4o.print(",\n"+s4o.indent_spaces);
   752           s4o.print(",\n"+s4o.indent_spaces);
   753         if (param_value == NULL) {
   753         if (param_value == NULL) {
   754           /* If not, get the default value of this variable's type */
   754           /* If not, get the default value of this variable's type */
   755           param_value = (symbol_c *)current_param_type->accept(*type_initial_value_c::instance());
   755           param_value = type_initial_value_c::get(current_param_type);
   756         }
   756         }
   757         if (param_value == NULL) ERROR;
   757         if (param_value == NULL) ERROR;
   758         s4o.print("(");
   758         s4o.print("(");
   759         if      (get_datatype_info_c::is_ANY_INT_literal(current_param_type))
   759         if      (get_datatype_info_c::is_ANY_INT_literal(current_param_type))
   760           get_datatype_info_c::lint_type_name.accept(*this);
   760           get_datatype_info_c::lint_type_name.accept(*this);