X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Ftr%2Fentity.c;h=5cf9e2ecc1dbeb19e63a46885bb9cc89e6afe79e;hb=6449e683c808a19471a7b2362b73e4dfb4c248d3;hp=7c57f22b7d07d412552854383f2c9cb8ce71a12d;hpb=1fb376a0abbaa02759baf1df5374a30a14c0dcb3;p=libfirm diff --git a/ir/tr/entity.c b/ir/tr/entity.c index 7c57f22b7..5cf9e2ecc 100644 --- a/ir/tr/entity.c +++ b/ir/tr/entity.c @@ -36,7 +36,10 @@ init_entity (void) /** ENTITY **/ /*******************************************************************/ -INLINE type *get_entity_owner (entity *ent); +/* redeclared to declare INLINE. */ +INLINE entity *get_entity_overwrites (entity *ent, int pos); +INLINE entity *get_entity_overwrittenby (entity *ent, int pos); +INLINE type *get_entity_owner (entity *ent); INLINE void insert_entity_in_owner (entity *ent) { type *owner = ent->owner; @@ -85,6 +88,8 @@ new_entity (type *owner, ident *name, type *type) current_ir_graph = rem; } else { res->variability = uninitialized; + res->value = NULL; + res->values = NULL; } res->peculiarity = existent; res->volatility = non_volatile; @@ -142,6 +147,9 @@ copy_entity_own (entity *old, type *new_owner) { new->overwrites = NEW_ARR_F(entity *, 1); new->overwrittenby = NEW_ARR_F(entity *, 1); } +#ifdef DEBUG_libfirm + new->nr = get_irp_new_node_nr(); +#endif insert_entity_in_owner (new); @@ -157,16 +165,23 @@ copy_entity_name (entity *old, ident *new_name) { memcpy (new, old, sizeof (entity)); new->name = new_name; new->ld_name = NULL; - new->overwrites = DUP_ARR_F(entity *, old->overwrites); - new->overwrittenby = DUP_ARR_F(entity *, old->overwrittenby); + if (is_class_type(new->owner)) { + new->overwrites = DUP_ARR_F(entity *, old->overwrites); + new->overwrittenby = DUP_ARR_F(entity *, old->overwrittenby); + } +#ifdef DEBUG_libfirm + new->nr = get_irp_new_node_nr(); +#endif insert_entity_in_owner (new); return new; } + void free_entity (entity *ent) { + free_tv_entity(ent); free_entity_attrs(ent); free(ent); }