gcc/

	* tree.h (host_integerp, tree_low_cst): Delete.
	* tree.c (host_integerp, tree_low_cst): Delete.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@204963 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 2c404891053accec2ba7a5c4ff0c9711f6c1d79e..6768fec5b193e24f383be725f0a0fbe3c1788420 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,8 @@
+2013-11-18  Richard Sandiford  <rdsandiford@googlemail.com>
+
+       * tree.h (host_integerp, tree_low_cst): Delete.
+       * tree.c (host_integerp, tree_low_cst): Delete.
+
 2013-11-18  Richard Sandiford  <rdsandiford@googlemail.com>
 
        * expr.h: Update comments to refer to tree_to_[su]hwi rather

diff --git a/gcc/tree.c b/gcc/tree.c
index f49f1fe405a2dbf0da73fc0fec09acdf3a9e6268..836db518b4510a8bfab0b28e8e9cdde766b9a823 100644 (file)
--- a/gcc/tree.c
+++ b/gcc/tree.c
@@ -6970,26 +6970,6 @@ tree_int_cst_compare (const_tree t1, const_tree t2)
     return 0;
 }
 
-/* Return 1 if T is an INTEGER_CST that can be manipulated efficiently on
-   the host.  If POS is zero, the value can be represented in a single
-   HOST_WIDE_INT.  If POS is nonzero, the value must be non-negative and can
-   be represented in a single unsigned HOST_WIDE_INT.  */
-
-int
-host_integerp (const_tree t, int pos)
-{
-  if (t == NULL_TREE)
-    return 0;
-
-  return (TREE_CODE (t) == INTEGER_CST
-         && ((TREE_INT_CST_HIGH (t) == 0
-              && (HOST_WIDE_INT) TREE_INT_CST_LOW (t) >= 0)
-             || (! pos && TREE_INT_CST_HIGH (t) == -1
-                 && (HOST_WIDE_INT) TREE_INT_CST_LOW (t) < 0
-                 && !TYPE_UNSIGNED (TREE_TYPE (t)))
-             || (pos && TREE_INT_CST_HIGH (t) == 0)));
-}
-
 /* Return true if T is an INTEGER_CST whose numerical value (extended
    according to TYPE_UNSIGNED) fits in a signed HOST_WIDE_INT.  */
 
@@ -7016,17 +6996,6 @@ tree_fits_uhwi_p (const_tree t)
          && TREE_INT_CST_HIGH (t) == 0);
 }
 
-/* Return the HOST_WIDE_INT least significant bits of T if it is an
-   INTEGER_CST and there is no overflow.  POS is nonzero if the result must
-   be non-negative.  We must be able to satisfy the above conditions.  */
-
-HOST_WIDE_INT
-tree_low_cst (const_tree t, int pos)
-{
-  gcc_assert (host_integerp (t, pos));
-  return TREE_INT_CST_LOW (t);
-}
-
 /* T is an INTEGER_CST whose numerical value (extended according to
    TYPE_UNSIGNED) fits in a signed HOST_WIDE_INT.  Return that
    HOST_WIDE_INT.  */

diff --git a/gcc/tree.h b/gcc/tree.h
index e61f6d403f78bb1a6b14a54e5b8b88bbe2547421..2ac3480fc6a47ded92c68f6a08a6947b78c6b2be 100644 (file)
--- a/gcc/tree.h
+++ b/gcc/tree.h
@@ -3657,11 +3657,6 @@ extern int attribute_list_contained (const_tree, const_tree);
 extern int tree_int_cst_equal (const_tree, const_tree);
 extern int tree_int_cst_lt (const_tree, const_tree);
 extern int tree_int_cst_compare (const_tree, const_tree);
-extern int host_integerp (const_tree, int)
-#ifndef ENABLE_TREE_CHECKING
-  ATTRIBUTE_PURE /* host_integerp is pure only when checking is disabled.  */
-#endif
-  ;
 extern bool tree_fits_shwi_p (const_tree)
 #ifndef ENABLE_TREE_CHECKING
   ATTRIBUTE_PURE /* tree_fits_shwi_p is pure only when checking is disabled.  */
@@ -3672,17 +3667,9 @@ extern bool tree_fits_uhwi_p (const_tree)
   ATTRIBUTE_PURE /* tree_fits_uhwi_p is pure only when checking is disabled.  */
 #endif
   ;
-extern HOST_WIDE_INT tree_low_cst (const_tree, int);
 extern HOST_WIDE_INT tree_to_shwi (const_tree);
 extern HOST_WIDE_INT tree_to_uhwi (const_tree);
 #if !defined ENABLE_TREE_CHECKING && (GCC_VERSION >= 4003)
-extern inline __attribute__ ((__gnu_inline__)) HOST_WIDE_INT
-tree_low_cst (const_tree t, int pos)
-{
-  gcc_assert (host_integerp (t, pos));
-  return TREE_INT_CST_LOW (t);
-}
-
 extern inline __attribute__ ((__gnu_inline__)) HOST_WIDE_INT
 tree_to_shwi (const_tree t)
 {