- array_type = new_type_array(id_from_str("a_tp", 4), N_DIMS, prim_t_int);
- set_array_bounds(array_type, 1,
- new_Const(mode_Iu, tarval_from_long (mode_Iu, L_BOUND)),
- new_Const(mode_Iu, tarval_from_long (mode_Iu, U_BOUND)));
+ array_type = new_type_array(new_id_from_chars("a_tp", 4), N_DIMS, prim_t_int);
+ current_ir_graph = get_const_code_irg();
+ set_array_bounds(array_type, 0,
+ new_Const(mode_Iu, new_tarval_from_long (L_BOUND, mode_Iu)),
+ new_Const(mode_Iu, new_tarval_from_long (U_BOUND, mode_Iu)));
+
+ main_irg = new_ir_graph (proc_main_e, 4);
+