X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Ftr%2Ftype_t.h;h=e61a951bb2d3c6b92b108679f373b4310dc1a5d4;hb=fb5957cbc4aaecd4e14cbc481e92e1c81260535a;hp=13818ed423fcd1c91989bf96bcb9d1079281744c;hpb=b7a0d752833eb7fb294ce90a27cbe01d06bbbc50;p=libfirm

diff --git a/ir/tr/type_t.h b/ir/tr/type_t.h
index 13818ed42..e61a951bb 100644
--- a/ir/tr/type_t.h
+++ b/ir/tr/type_t.h
@@ -87,7 +87,7 @@ typedef struct {
 	size_t  n_dimensions;   /**< Number of array dimensions.  */
 	ir_node **lower_bound;  /**< Lower bounds of dimensions.  Usually all 0. */
 	ir_node **upper_bound;  /**< Upper bounds or dimensions. */
-	int     *order;         /**< Ordering of dimensions. */
+	size_t  *order;         /**< Ordering of dimensions. */
 	ir_type *element_type;  /**< The type of the array elements. */
 	ir_entity *element_ent; /**< entity for the array elements, to be used for
 	                             element selection with a Sel node. */
@@ -308,6 +308,28 @@ static inline void _set_master_type_visited(ir_visited_t val) { firm_type_visite
 static inline ir_visited_t _get_master_type_visited(void)     { return firm_type_visited; }
 static inline void _inc_master_type_visited(void)             { ++firm_type_visited; }
 
+static inline int is_lowered_type(const ir_type *tp)
+{
+	return tp->flags & tf_lowered_type;
+}
+
+/**
+ * Gets the lowered/unlowered type of a type or NULL if this type
+ * has no lowered/unlowered one.
+ */
+static inline ir_type *get_associated_type(const ir_type *tp)
+{
+	return tp->assoc_type;
+}
+
+static inline void set_lowered_type(ir_type *tp, ir_type *lowered_type)
+{
+	assert (is_type(tp) && is_type(lowered_type));
+	lowered_type->flags |= tf_lowered_type;
+	tp->assoc_type = lowered_type;
+	lowered_type->assoc_type = tp;
+}
+
 static inline void *_get_type_link(const ir_type *tp)
 {
 	assert(tp && tp->kind == k_type);