* tree.c (iterative_hash_expr): Use real_hash.

From-SVN: r82720

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 7a5323007bee8634caef1533ef90a64847941411..d15e179fa3da9fb6e9c2f24d625f71f6c03646d1 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,7 @@
+2004-06-07  J"orn Rennecke <joern.rennecke@superh.com>
+
+       * tree.c (iterative_hash_expr): Use real_hash.
+
 2004-06-07  Joseph S. Myers  <jsm@polyomino.org.uk>
 
        PR c/14765

diff --git a/gcc/tree.c b/gcc/tree.c
index f8b677926b5c90a9866d89a31cc58567964ea1df..045959c5c012d4cf9091cfe9d2826ec13c3d1d84 100644 (file)
--- a/gcc/tree.c
+++ b/gcc/tree.c
@@ -3846,8 +3846,11 @@ iterative_hash_expr (tree t, hashval_t val)
          val = iterative_hash_object (TREE_INT_CST_HIGH (t), val);
        }
       else if (code == REAL_CST)
-       val = iterative_hash (TREE_REAL_CST_PTR (t),
-                             sizeof (REAL_VALUE_TYPE), val);
+       {
+         unsigned int val2 = real_hash (TREE_REAL_CST_PTR (t));
+
+         val = iterative_hash (&val2, sizeof (unsigned int), val);
+       }
       else if (code == STRING_CST)
        val = iterative_hash (TREE_STRING_POINTER (t),
                              TREE_STRING_LENGTH (t), val);