X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Ftr%2Ftpop_t.h;h=6710fdc19e4573f2099451080bd3ef8e2d54c7df;hb=f64411a2a8a4e28e70a281ac67736a1bdf996b72;hp=4d51cf027df9865703710d80912e15319b5c6b38;hpb=21cd22b177b3844bc786f3bfbb4bcbe816ec371d;p=libfirm

diff --git a/ir/tr/tpop_t.h b/ir/tr/tpop_t.h
index 4d51cf027..6710fdc19 100644
--- a/ir/tr/tpop_t.h
+++ b/ir/tr/tpop_t.h
@@ -9,27 +9,74 @@
  * Copyright:   (c) 2001-2003 Universität Karlsruhe
  * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
  */
+#ifndef _TPOP_T_H_
+#define _TPOP_T_H_
 
+#include <stdlib.h>
 
-# ifndef _TPOP_T_H_
-# define _TPOP_T_H_
+#include "firm_types.h"
+#include "tpop.h"
+#include "irmode.h"
 
-# include <stddef.h>
-# include "tpop.h"
 /**
  * @file tpop_t.h
  *
  * This file contains the datatypes hidden in tpop.h.
  *
- * @autor Goetz Lindenmaier
+ * @author Goetz Lindenmaier
  * @see  tpop.h
  */
 
+/** A function called to free attributes of a type. */
+typedef void (*free_attrs_func)(type *tp);
+
+/** A function called to free owned entities of a type. */
+typedef void (*free_entities_func)(type *tp);
+
+/** A function called to free all automatic allocated entities of a type. */
+typedef void (*free_auto_entities_func)(type *tp);
+
+/** A function called to set the mode of a type. */
+typedef void (*set_type_mode_func)(type *tp, ir_mode *m);
+
+/** A function called to set the size of a type in bits */
+typedef void (*set_type_size_func)(type *tp, int size);
+
+/** A function called to get the number of compound members */
+typedef int (*get_n_members_func)(const type *tp);
+
+/** A function called to get the pos'th compound member */
+typedef entity *(*get_member_func)(const type *tp, int pos);
+
+/** A function called to insert an entity into the type */
+typedef void (*insert_entity_func)(type *tp, entity *member);
+
+
+/**
+ * tp_op operations.
+ */
+typedef struct _tp_op_ops {
+  free_attrs_func         free_attrs;         /**< called to free the attributes of a type */
+  free_entities_func      free_entities;      /**< called to free the owned entities of a type */
+  free_auto_entities_func free_auto_entities; /**< called to free the automatic allocated entities of a type */
+  set_type_mode_func      set_type_mode;      /**< called to set a ir_mode of a type */
+  set_type_size_func      set_type_size;      /**< called to set the bit size of a type */
+  get_n_members_func      get_n_members;      /**< called to return the number of compound members */
+  get_member_func         get_member;         /**< called to get the pos'th compound member */
+} tp_op_ops;
+
+/** possible flags for a type opcode */
+enum tp_op_flags_t {
+  TP_OP_FLAG_COMPOUND = 1   /**< is a compound type */
+};
+
 /** The type opcode */
 struct tp_op {
-  tp_opcode code;
-  ident *name;
-  size_t attr_size;
+  tp_opcode code;                     /**< the tpop code */
+  ident     *name;                    /**< the name of the type opcode */
+  size_t    attr_size;                /**< the attribute size for a type of this opcode */
+  unsigned  flags;                    /**< flags for this opcode */
+  tp_op_ops ops;                      /**< tp_op operations */
 };
 
 /**
@@ -41,17 +88,24 @@ struct tp_op {
  *
  *   @param code        the enum for this type opcode.
  *   @param name        an ident for the name of the type opcode.
+ *   @param flags       additional flags
  *   @param attr_size   the size of the attributes necessary for a type with
  *                      this opcode
+ *   @param ops         the tp_op operations for this type
  *   @return A new type opcode.
- *
  */
-tp_op *new_tpop (tp_opcode code, ident *name, size_t attr_size);
+tp_op *new_tpop (tp_opcode code, ident *name, unsigned flags, size_t attr_size,
+                 const tp_op_ops *ops);
+
+/**
+ * Free a tpop datastructure.
+ */
+void free_tpop(tp_op *tpop);
 
 /**
  *   Initialize the tpop module.
  *
- *   Must be called during the initizlization of the library. Allocates
+ *   Must be called during the initialization of the library. Allocates
  *   opcodes and sets the globals that are external visible as specified
  *   in tpop.h.
  *   Allocates opcodes for classes, struct, method, union, array,
@@ -59,6 +113,13 @@ tp_op *new_tpop (tp_opcode code, ident *name, size_t attr_size);
  */
 void init_tpop (void);
 
+/**
+ *  Finalize the tpop module.
+ *
+ *  Frees all type opcodes.
+ */
+void finish_tpop(void);
+
 /**
  *   Returns the size of the attribute to this kind
  *   of type.
@@ -69,6 +130,30 @@ void init_tpop (void);
  *   @return The size of the attribute of types with this opcode.
  *
  */
-int get_tpop_attr_size (tp_op *op);
+int get_tpop_attr_size (const tp_op *op);
+
+
+/* ---------------- *
+ * inline functions *
+ * -----------------*/
+
+static INLINE tp_opcode
+_get_tpop_code(const tp_op *op) {
+  return op->code;
+}
+
+static INLINE ident *
+_get_tpop_ident(const tp_op *op){
+  return op->name;
+}
+
+static INLINE int
+_get_tpop_attr_size(const tp_op *op) {
+  return op->attr_size;
+}
+
+#define get_tpop_code(op)      _get_tpop_code(op)
+#define get_tpop_ident(op)     _get_tpop_ident(op)
+#define get_tpop_attr_size(op) _get_tpop_attr_size(op)
 
 #endif /* _TPOP_T_H_ */