#ifndef _READ_T_H_
#define _READ_T_H_
-#include "type.h"
-#include "entity.h"
-#include "ident.h"
+#include "firm_types.h"
/* first, the xml structures */
typedef struct type_str
{
- const ident *type_ident;
- const ident *id; /* id for references */
- type *f_tp; /* firm type */
+ ident *type_ident;
+ ident *id; /* id for references */
+ ir_type *f_tp; /* firm type */
struct type_str *prev;
} type_t;
typedef struct entity_str
{
- const ident *ent_ident; /* name of entity */
- const ident *tp_ident; /* name of type/class */
- const ident *id; /* id for references */
- const ident *owner; /* id of owner */
- entity *f_ent; /* firm entity */
+ ident *ent_ident; /* name of entity */
+ ident *tp_ident; /* name of type/class */
+ ident *id; /* id for references */
+ ident *owner; /* id of owner */
+ ir_entity *f_ent; /* firm entity */
struct entity_str *prev;
} entity_t;
typedef struct arg_str
{
- const ident *type_ident;
+ ident *type_ident;
int num;
} arg_t;
typedef struct load_str
{
- const ident *ptrrefid; /* id of valref node enclosed in select, or -1 */
+ ident *ptrrefid; /* id of valref node enclosed in select, or -1 */
entity_t *ent;
} load_t;
typedef struct store_str
{
- const ident *ptrrefid; /* id of ptr valref node enclosed in select, or -1 */
- const ident *valrefid; /* id of val valref node enclosed in select, or -1 */
+ ident *ptrrefid; /* id of ptr valref node enclosed in select, or -1 */
+ ident *valrefid; /* id of val valref node enclosed in select, or -1 */
entity_t *ent;
} store_t;
typedef struct alloc_str
{
- const ident *tp_id;
+ ident *tp_id;
} alloc_t;
typedef struct call_str
{
- const ident *valrefid; /* id of enclosed valref node, or -1 */
- entity_t *ent; /* called entity */
+ ident *valrefid; /* id of enclosed valref node, or -1 */
+ entity_t *ent; /* called entity */
int n_args;
- const ident **args;
+ ident **args;
} call_t;
typedef struct unknown_str
typedef struct join_str
{
int n_ins;
- const ident **ins;
+ ident **ins;
} join_t;
typedef struct ret_str
{
- const ident *ret_id;
+ ident *ret_id;
} ret_t; /* returned value, or NO_ID */
typedef struct raise_str
{
- const ident *valref; /* what was that one for? */
- const ident *tp_id;
+ ident *valref; /* what was that one for? */
+ ident *tp_id;
} raise_t;
/* dummy type for all other effects */
typedef struct eff_str
{
eff_node_kind_t kind;
- const ident *id; /* identifier to access this node */
+ ident *id; /* identifier to access this node */
union {
arg_t arg;
valref_t valref;
typedef struct proc_str
{
- const ident *proc_ident; /* name of procedure */
- const ident *ownerid;
+ ident *proc_ident; /* name of procedure */
+ ident *ownerid;
int n_effs;
eff_t **effs;
struct proc_str *next;
typedef struct mod_str
{
- const ident *id;
+ ident *id;
type_t *types; /* types in module *//* @@@ TODO hash set */
entity_t *entities; /* entities in module *//* @@@ TODO hash set */
proc_t *procs; /* methods with effects */
/*
$Log$
+ Revision 1.5 2007/02/02 12:38:35 matze
+ entity is ir_entity now
+
+ Revision 1.4 2006/12/15 12:37:40 matze
+ fix warnings
+
+ Revision 1.3 2006/06/09 11:26:35 firm
+ renamed type to ir_type
+
Revision 1.2 2004/12/10 15:14:16 beck
Removed unused header files
move xml macros to read.c, freeing the header from libxml depency