tarval_is_minus_one() added

[r16397]

diff --git a/ir/tv/tv.c b/ir/tv/tv.c
index e4e37da..09c8de6 100644 (file)
--- a/ir/tv/tv.c
+++ b/ir/tv/tv.c
@@ -761,6 +761,15 @@ int tarval_is_all_one(tarval *tv) {
                tv == get_mode_all_one(get_tarval_mode(tv));
 }
 
+/*
+ * test if one, 1 means 'yes'
+ */
+int tarval_is_minus_one(tarval *a) {
+       return
+               a != tarval_bad &&
+               a == get_tarval_minus_one(get_tarval_mode(a));
+}
+
 /*
  * comparison
  */