2010-05-16 Richard Guenther <rguenther@suse.de>

	* trans-decl.c (module_htab_decls_hash): Revert last change.

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

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 386c90f..af8ce0a 100644 (file)
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,5 +1,9 @@
 2010-05-16  Richard Guenther  <rguenther@suse.de>
 
+       * trans-decl.c (module_htab_decls_hash): Revert last change.
+
+2010-05-16  Richard Guenther  <rguenther@suse.de>
+
        * trans-decl.c (module_htab_decls_hash): Use IDENTIFIER_HASH_VALUE.
 
 2010-05-16  Manuel López-Ibáñez  <manu@gcc.gnu.org>

diff --git a/gcc/fortran/trans-decl.c b/gcc/fortran/trans-decl.c
index 3216f68..56c88bc 100644 (file)
--- a/gcc/fortran/trans-decl.c
+++ b/gcc/fortran/trans-decl.c
@@ -3374,7 +3374,7 @@ module_htab_decls_hash (const void *x)
   const_tree n = DECL_NAME (t);
   if (n == NULL_TREE)
     n = TYPE_NAME (TREE_TYPE (t));
-  return IDENTIFIER_HASH_VALUE (n);
+  return htab_hash_string (IDENTIFIER_POINTER (n));
 }
 
 static int