X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;ds=sidebyside;f=ir%2Ftv%2Ftv_t.h;h=a8098682719afb67b1c37e5364a51ed29b6b3ee4;hb=12aaa3fc53618991634823a6738f50360a54633b;hp=328d257df2282e14860e5bbba70b50671283869d;hpb=4316c00364a6ec0ac7f7aef14af3667b12f96cf3;p=libfirm

diff --git a/ir/tv/tv_t.h b/ir/tv/tv_t.h
index 328d257df..a80986827 100644
--- a/ir/tv/tv_t.h
+++ b/ir/tv/tv_t.h
@@ -1,5 +1,5 @@
 /*
- * Copyright (C) 1995-2007 University of Karlsruhe.  All right reserved.
+ * Copyright (C) 1995-2011 University of Karlsruhe.  All right reserved.
  *
  * This file is part of libFirm.
  *
@@ -23,12 +23,11 @@
  *           values -- private header.
  * @date     2003
  * @author   Mathias Heil
- * @version  $Id$
  */
 #ifndef FIRM_TV_TV_T_H
 #define FIRM_TV_TV_T_H
 
-#include "firm_config.h"
+#include "firm_common.h"
 
 #include <assert.h>
 #include "irmode.h"
@@ -36,10 +35,12 @@
 
 /** Debugging aid for the firmEvaluator: Marks for reserved tarvals values. */
 enum reserved_id {
-  resid_tarval_bad       = 1,  /**< tarval_bad marker. */
-  resid_tarval_undefined = 2,  /**< tarval_undefined marker. */
-  resid_tarval_b_false   = 3,  /**< tarval_b_false marker. */
-  resid_tarval_b_true    = 4   /**< tarval_b_true marker. */
+	resid_tarval_bad         = 1,  /**< tarval_bad marker. */
+	resid_tarval_undefined   = 2,  /**< tarval_undefined marker. */
+	resid_tarval_b_false     = 3,  /**< tarval_b_false marker. */
+	resid_tarval_b_true      = 4,  /**< tarval_b_true marker. */
+	resid_tarval_unreachable = 5,  /**< tarval_unreachable marker. */
+	resid_tarval_reachable   = 6   /**< tarval_reachable marker. */
 };
 
 /**
@@ -47,9 +48,12 @@ enum reserved_id {
  *
  * Call before init_mode().
  *
- * @param null_value  The reference mode NULL value, typical 0l
+ * @param null_value
+ *            The reference mode NULL value, typical 0l
+ * @param support_quad_precision
+ *            If non-zero, activate support for quad precision
  */
-void init_tarval_1(long null_value);
+void init_tarval_1(long null_value, int support_quad_precision);
 
 /**
  * Initialization of the tarval module.
@@ -76,48 +80,65 @@ void finish_tarval(void);
  * @sa
  *   irmode.h for predefined modes
  */
-struct tarval {
-  firm_kind kind;         /**< must be k_tarval */
-  ir_mode   *mode;        /**< the mode of the stored value */
-  const void *value;      /**< the value stored in an internal way... */
-  unsigned int length;    /**< the length of the stored value */
+struct ir_tarval {
+	firm_kind  kind;    /**< must be k_tarval */
+	ir_mode    *mode;   /**< the mode of the stored value */
+	const void *value;  /**< the value stored in an internal way... */
+	size_t     length;  /**< the length of the stored value */
 };
 
 /* inline functions */
 /*
  * Access routines for tarval fields ========================================
  */
-static INLINE ir_mode *
-_get_tarval_mode(const tarval *tv) {
-  assert(tv);
-  return tv->mode;
+static inline ir_mode *_get_tarval_mode(const ir_tarval *tv)
+{
+	assert(tv);
+	return tv->mode;
 }
 
-static INLINE tarval *
-_get_tarval_bad(void) {
-  return tarval_bad;
+static inline ir_tarval *_get_tarval_bad(void)
+{
+	return tarval_bad;
 }
 
-static INLINE tarval *
-_get_tarval_undefined(void) {
-  return tarval_undefined;
+static inline ir_tarval *_get_tarval_undefined(void)
+{
+	return tarval_undefined;
 }
 
-static INLINE tarval *
-_get_tarval_b_false(void) {
-  return tarval_b_false;
+static inline ir_tarval *_get_tarval_b_false(void)
+{
+	return tarval_b_false;
 }
 
-static INLINE tarval *
-_get_tarval_b_true(void) {
-  return tarval_b_true;
+static inline ir_tarval *_get_tarval_b_true(void)
+{
+	return tarval_b_true;
 }
 
-#define get_tarval_mode(tv)     _get_tarval_mode(tv)
-#define get_tarval_bad()        _get_tarval_bad()
-#define get_tarval_undefined()  _get_tarval_undefined()
-#define get_tarval_b_false()    _get_tarval_b_false()
-#define get_tarval_b_true()     _get_tarval_b_true()
-#define get_tarval_P_void()     _get_tarval_P_void()
+static inline ir_tarval *_get_tarval_reachable(void)
+{
+	return tarval_reachable;
+}
+
+static inline ir_tarval *_get_tarval_unreachable(void)
+{
+	return tarval_unreachable;
+}
+
+static inline int _is_tarval(const void *thing)
+{
+	return get_kind(thing) == k_tarval;
+}
+
+#define get_tarval_mode(tv)      _get_tarval_mode(tv)
+#define get_tarval_bad()         _get_tarval_bad()
+#define get_tarval_undefined()   _get_tarval_undefined()
+#define get_tarval_b_false()     _get_tarval_b_false()
+#define get_tarval_b_true()      _get_tarval_b_true()
+#define get_tarval_unreachable() _get_tarval_unreachable()
+#define get_tarval_reachable()   _get_tarval_reachable()
+#define is_tarval(thing)         _is_tarval(thing)
 
 #endif /* FIRM_TV_TV_T_H */