new_entity(get_glob_type(),new_id_from_chars("VAR_B",6),prim_t_int));
/* set VAR_A and VAR_B to constant values */
set_store (new_Proj (new_Store (get_store (), a,
- new_Const (mode_Iu, new_tarval_from_long (0, mode_Is))),
+ new_Const (mode_Iu, new_tarval_from_long (0, mode_Iu))),
mode_M, 0));
set_store (new_Proj (new_Store (get_store (), b,
- new_Const (mode_Iu, new_tarval_from_long (1, mode_Is))),
+ new_Const (mode_Iu, new_tarval_from_long (1, mode_Iu))),
mode_M, 0));
/* finish this first block */
/* exchange the content of the two variables. Exceptions not cached. */
/* load the value and make it's effects visible. */
- x = new_Load (get_store (), a);
+ x = new_Load (get_store (), a, mode_Iu);
set_store (new_Proj (x, mode_M, 0));
x = new_Proj(x, mode_Iu, 2);
/* the same again: load the value and make it's effects visible. */
- y = new_Load (get_store (), b);
+ y = new_Load (get_store (), b, mode_Iu);
set_store (new_Proj (y, mode_M, 0));
y = new_Proj(y, mode_Iu, 2);
/* store the exchanged values. */
x = new_Cond (
new_Proj (
new_Cmp (
- new_Const (mode_Iu, new_tarval_from_long (0, mode_Is)),
+ new_Const (mode_Iu, new_tarval_from_long (0, mode_Iu)),
x),
- mode_b, Gt));
+ mode_b, pn_Cmp_Gt));
/* build the cfg of the loop */
add_immBlock_pred (r, new_Proj (x, mode_X, 0));
/* generate the return block and return the content of VAR_A */
{
ir_node *in[1];
- x = new_Load (get_store (), a);
+ x = new_Load (get_store (), a, mode_Iu);
in[0] = new_Proj (x, mode_Iu, 2);
x = new_Return (new_Proj(x, mode_M, 0), 1, in);
add_immBlock_pred (get_irg_end_block(irg), x);
mature_immBlock (get_irg_end_block(irg));
- finalize_cons (irg);
+ irg_finalize_cons (irg);
printf("Optimizing ...\n");
dead_node_elimination(irg);