* tree.c (iterative_hash_expr): Use real_hash.

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

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 7a53230..d15e179 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 f8b6779..045959c 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);