X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Ftr%2Fentity.h;h=48e911443c0d53edf44471be3f580430b54bd4b6;hb=aeccc4a872226c8e08e6241bcd56b846e400c52d;hp=1239ba3f734363822de29c97b1283262406e5fdc;hpb=d88be9755d1677cd1b1cfb3421769fb87cb15997;p=libfirm diff --git a/ir/tr/entity.h b/ir/tr/entity.h index 1239ba3f7..48e911443 100644 --- a/ir/tr/entity.h +++ b/ir/tr/entity.h @@ -66,6 +66,24 @@ void init_entity (void); typedef struct ir_graph ir_graph; #endif +/****s* entity/entity + * + * NAME + * entity - An abstract data type to represent program entites. + * NOTE + * + * ... not documented ... + * + * ATTRIBUTES + * + * + * These fields can only be accessed via access functions. + * + * SEE ALSO + * type + * SOURCE + */ + #ifndef _ENTITY_TYPEDEF_ #define _ENTITY_TYPEDEF_ /* to resolve recursion between entity.h and type.h */ @@ -75,22 +93,32 @@ typedef struct entity entity; /* Creates a new entity. Automatically inserts the entity as a member of owner. */ entity *new_entity (type *owner, ident *name, type *type); - -/* manipulate fields of entity */ +/* Copies the entity if the new_owner is different from the + owner of the old entity. Else returns the old entity. + Automatically inserts the new entity as a member of owner. */ +entity *copy_entity_own (entity *old, type *new_owner); +/* Copies the entity if the new_name is different from the + name of the old entity. Else returns the old entity. + Automatically inserts the new entity as a member of owner. + The mangled name ld_name is set to NULL. */ +entity *copy_entity_name (entity *old, ident *new_name); + +/** manipulate fields of entity **/ const char *get_entity_name (entity *ent); ident *get_entity_ident (entity *ent); -/* returns the mangled name of the entity */ -ident *get_entity_ld_name (entity *ent); +/* returns the mangled name of the entity. If the mangled name is + set it returns the existing name. Else it generates a name + with mangle_entity() and remembers this new name internally. */ +ident *get_entity_ld_ident (entity *ent); +void set_entity_ld_ident (entity *ent, ident *ld_ident); /* char *get_entity_ld_name (entity *ent); void set_entity_ld_name (entity *ent, char *ld_name); - -ident *get_entity_ld_ident (entity *ent); -void set_entity_ld_ident (entity *ent, ident *ld_ident); */ type *get_entity_owner (entity *ent); +/* Sets the owner field in entity to owner. */ void set_entity_owner (entity *ent, type *owner); inline void assert_legal_owner_of_ent(type *owner); @@ -126,10 +154,26 @@ void set_entity_visibility (entity *ent, ent_visibility vis); int get_entity_offset (entity *ent); void set_entity_offset (entity *ent, int offset); +/* Overwrites is a field that specifies that an access to the overwritten + entity in the supertype must use this entity. It's a list as with + multiple inheritance several enitites can be overwritten. This field + is mostly useful for method entities. + If a Sel node selects an entity that is overwritten by other entities it + must return a pointer to the entity of the dynamic type of the pointer + that is passed to it. Lowering of the Sel node must assure this. */ +void add_entity_overwrites (entity *ent, entity *overwritten); +int get_entity_n_overwrites (entity *ent); +entity *get_entity_overwrites (entity *ent, int pos); +void set_entity_overwrites (entity *ent, int pos, entity *overwritten); +/* Do we need a second relation "overwritten"? */ + /* The entity knows the corresponding irg if the entity is a method. This allows to get from a Call to the called irg. */ ir_graph *get_entity_irg(entity *ent); void set_entity_irg(entity *ent, ir_graph *irg); + +/*****/ + # endif /* _ENTITY_H_ */