iropt.c */
res->outs = NULL;
- res->phase_state = phase_building;
+ res->inline_property = irg_inline_any;
+ res->additional_properties = 0;
+
+ res->phase_state = phase_building;
res->op_pin_state_pinned = op_pin_state_pinned;
- res->outs_state = outs_none;
- res->dom_state = dom_none;
- res->typeinfo_state = ir_typeinfo_none;
+ res->outs_state = outs_none;
+ res->dom_state = dom_none;
+ res->typeinfo_state = ir_typeinfo_none;
set_irp_typeinfo_inconsistent(); /* there is a new graph with typeinfo_none. */
- res->loopinfo_state = loopinfo_none;
- res->class_cast_state = ir_class_casts_transitive;
- res->extblk_state = ir_extblk_info_none;
+ res->callee_info_state = irg_callee_info_none;
+ res->loopinfo_state = loopinfo_none;
+ res->execfreq_state = exec_freq_none;
+ res->class_cast_state = ir_class_casts_transitive;
+ res->extblk_state = ir_extblk_info_none;
/*-- Type information for the procedure of the graph --*/
res->ent = ent;
set_entity_irg(ent, res);
/*-- a class type so that it can contain "inner" methods as in Pascal. --*/
- res->frame_type = new_type_class(mangle(get_entity_ident(ent), frame_type_suffix));
-
- /* Remove type from type list. Must be treated differently than other types. */
- remove_irp_type_from_list(res->frame_type);
+ res->frame_type = new_type_frame(mangle(get_entity_ident(ent), frame_type_suffix));
/*-- Nodes needed in every graph --*/
res->end_block = new_immBlock();
/* Proj results of start node */
projX = new_Proj (res->start, mode_X, pn_Start_X_initial_exec);
- res->frame = new_Proj (res->start, mode_P_mach, pn_Start_P_frame_base);
- res->globals = new_Proj (res->start, mode_P_mach, pn_Start_P_globals);
+ res->frame = new_Proj (res->start, mode_P_data, pn_Start_P_frame_base);
+ res->globals = new_Proj (res->start, mode_P_data, pn_Start_P_globals);
res->initial_mem = new_Proj (res->start, mode_M, pn_Start_M);
res->args = new_Proj (res->start, mode_T, pn_Start_T_args);
#ifdef DEBUG_libfirm
_set_irg_frame_type(irg, ftp);
}
-
-/* To test for a frame type */
-int
-is_frame_type(const type *ftp) {
- int i;
- if (is_Class_type(ftp)) {
- for (i = 0; i < get_irp_n_irgs(); i++) {
- const type *frame_tp = get_irg_frame_type(get_irp_irg(i));
- if (ftp == frame_tp) return true;
- }
- }
- return false;
-}
-
int
get_irg_n_locs (ir_graph *irg)
{
_set_irg_inline_property(irg, s);
}
+unsigned
+(get_irg_additional_properties)(const ir_graph *irg) {
+ return _get_irg_additional_properties(irg);
+}
+
+void
+(set_irg_additional_properties)(ir_graph *irg, unsigned property_mask) {
+ _set_irg_additional_properties(irg, property_mask);
+}
+
+void
+(set_irg_additional_property)(ir_graph *irg, irg_additional_property flag) {
+ _set_irg_additional_property(irg, flag);
+}
+
void
(set_irg_link)(ir_graph *irg, void *thing) {
_set_irg_link(irg, thing);