X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Fir%2Firgraph.c;h=68cf7830e4f2543e487139be80ddf7b9e8113d69;hb=637542932dc27dcdfc7def09b58d9d5d4c34fb77;hp=0d6b355bb0f6dc9be461cc53fae192b0beb84eb5;hpb=3f1a1d071c16d56cc73ab39d061707ba8a60e1e1;p=libfirm

diff --git a/ir/ir/irgraph.c b/ir/ir/irgraph.c
index 0d6b355bb..68cf7830e 100644
--- a/ir/ir/irgraph.c
+++ b/ir/ir/irgraph.c
@@ -92,13 +92,20 @@ void init_irgraph(void) {
  * allocated (new_r_ir_graph, new_const_code_irg).
  * @return Memory for a new graph.
  */
-static ir_graph *alloc_graph(void)
-{
-	size_t size = sizeof(ir_graph) + additional_graph_data_size;
-	char *ptr = xmalloc(size);
-	memset(ptr, 0, size);
+static ir_graph *alloc_graph(void) {
+  size_t size = sizeof(ir_graph) + additional_graph_data_size;
+  char *ptr = xmalloc(size);
+  memset(ptr, 0, size);
+
+  return (ir_graph *) (ptr + additional_graph_data_size);
+}
 
-	return (ir_graph *) (ptr + additional_graph_data_size);
+/**
+ * Frees an allocated IR graph
+ */
+static void free_graph(ir_graph *irg) {
+  char *ptr = (char *)irg;
+  free(ptr - additional_graph_data_size);
 }
 
 #if USE_EXPLICIT_PHI_IN_STACK
@@ -161,18 +168,23 @@ new_r_ir_graph (entity *ent, int n_loc)
 #endif
   res->kind = k_ir_graph;
   res->obst = xmalloc (sizeof(*res->obst));
-  obstack_init (res->obst);
+  obstack_init(res->obst);
+  res->extbb_obst = NULL;
+
   res->value_table = new_identities (); /* value table for global value
                        numbering for optimizing use in
                        iropt.c */
   res->outs = NULL;
 
-  res->phase_state    = phase_building;
+  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 = irg_typeinfo_none;
-  res->loopinfo_state = loopinfo_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;
 
   /*-- Type information for the procedure of the graph --*/
   res->ent = ent;
@@ -255,8 +267,12 @@ ir_graph *new_const_code_irg(void) {
   res->kind = k_ir_graph;
   res->obst      = xmalloc (sizeof(*res->obst));
   obstack_init (res->obst);
+  res->extbb_obst = NULL;
+
   res->phase_state = phase_building;
   res->op_pin_state_pinned = op_pin_state_pinned;
+  res->extblk_state = ir_extblk_info_none;
+
   res->value_table = new_identities (); /* value table for global value
                        numbering for optimizing use in
                        iropt.c */
@@ -308,6 +324,7 @@ void  del_identities (pset *value_table);
    Does not free types, entities or modes that are used only by this
    graph, nor the entity standing for this graph. */
 void free_ir_graph (ir_graph *irg) {
+  assert(is_ir_graph(irg));
 
   hook_free_graph(irg);
   if (irg->outs_state != outs_none) free_outs(irg);
@@ -329,7 +346,7 @@ void free_ir_graph (ir_graph *irg) {
   if (irg->loc_descriptions)
     free(irg->loc_descriptions);
   irg->kind = k_BAD;
-  free(irg);
+  free_graph(irg);
 }
 
 /* access routines for all ir_graph attributes:
@@ -631,18 +648,8 @@ void
 }
 
 void
-set_irg_loopinfo_inconsistent(ir_graph *irg) {
-  if (irg->loopinfo_state == loopinfo_ip_consistent)
-    irg->loopinfo_state = loopinfo_ip_inconsistent;
-
-  else if (irg->loopinfo_state == loopinfo_consistent)
-    irg->loopinfo_state = loopinfo_inconsistent;
-
-  else if (irg->loopinfo_state == loopinfo_cf_ip_consistent)
-    irg->loopinfo_state = loopinfo_cf_ip_inconsistent;
-
-  else if (irg->loopinfo_state == loopinfo_cf_consistent)
-    irg->loopinfo_state = loopinfo_cf_inconsistent;
+(set_irg_loopinfo_inconsistent)(ir_graph *irg) {
+  _set_irg_loopinfo_inconsistent(irg);
 }
 
 void