/*
* Generate Firm assembler from Firm graphs.
*
- * (C) 2005-2006 Michael Beck beck@ipd.info.uni-karlsruhe.de
+ * (C) 2005-2009 Michael Beck beck@ipd.info.uni-karlsruhe.de
*/
#include <stdio.h>
#include <string.h>
if (get_method_n_ress(tp) == 0)
fprintf(f, "void");
else
- fprintf(f, get_type_name(get_method_res_type(tp, 0)));
+ fputs(get_type_name(get_method_res_type(tp, 0)), f);
fprintf(f, " %s(", s);
n = get_method_n_params(tp);
if (n == 0)
- fprintf(f, get_method_variadicity(tp) == variadicity_variadic ? "" : "void");
+ fputs(get_method_variadicity(tp) == variadicity_variadic ? "" : "void", f);
else {
for (i = 0; i < n; ++i) {
if (i > 0)
fprintf(f, ", ");
- fprintf(f, get_type_name(get_method_param_type(tp, i)));
+ fputs(get_type_name(get_method_param_type(tp, i)), f);
}
if (get_method_variadicity(tp) == variadicity_variadic)
fprintf(f, ", ...");
X(get_irg_initial_exec(irg))
X(get_irg_frame(irg))
X(get_irg_tls(irg))
- X(get_irg_value_param_base(irg))
X(get_irg_initial_mem(irg))
X(get_irg_no_mem(irg))
else
else {
def_mode:
tarval_snprintf(buf, sizeof(buf), tv);
- fprintf(f, "new_tarval_from_str(\"%s\", %zd, ", buf, strlen(buf));
+ fprintf(f, "new_tarval_from_str(\"%s\", %u, ", buf, (unsigned) strlen(buf));
fprintf(f, "mode_%s)", get_mode_name(mode));
}
}
ident *id;
ir_type *tp;
ir_entity *ent;
- ir_label_t label;
symconst_kind kind = get_SymConst_kind(n);
const char *k_name = "NULL";
const char *str;
fprintf(f, " sym.ident_p = new_id_from_chars(\"%s\", %d);\n", str, get_id_strlen(id));
k_name = "symconst_enum_const";
break;
- case symconst_label:
- label = get_SymConst_label(n);
- fprintf(f, " sym.label = %lu;\n", label);
- k_name = "symconst_label";
- break;
}
name(f, " ", n, " = new_r_SymConst(irg, ");
name(f, NULL, get_nodes_block(n), ", sym, ");
fprintf(f, "mode_b, %s);\n", proj_nr ? "pn_Cond_true" : "pn_Cond_false");
}
else {
- if (proj_nr == get_Cond_defaultProj(cond))
+ if (proj_nr == get_Cond_default_proj(cond))
name(f, " ", n, " = new_r_defaultProj(irg, ");
else
name(f, " ", n, " = new_r_Proj(irg, ");