aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMartin Liska <mliska@suse.cz>2018-10-31 11:59:34 +0100
committerMartin Liska <marxin@gcc.gnu.org>2018-10-31 10:59:34 +0000
commit2e71b5714df37470cbfa44eb1faefd4e1bc22648 (patch)
tree2be1c8afeeb3147e114b0134ff8a7027cf99bbbe
parent6dc8ee419ea91a2641e35b7b00b81639f5bb4a8e (diff)
downloadgcc-2e71b5714df37470cbfa44eb1faefd4e1bc22648.zip
gcc-2e71b5714df37470cbfa44eb1faefd4e1bc22648.tar.gz
gcc-2e71b5714df37470cbfa44eb1faefd4e1bc22648.tar.bz2
Fix hash-table violation in trans-decl.c.
2018-10-31 Martin Liska <mliska@suse.cz> * trans-decl.c (struct module_hasher): Call htab_hash_string for s->name and not for s. From-SVN: r265663
-rw-r--r--gcc/fortran/ChangeLog5
-rw-r--r--gcc/fortran/trans-decl.c6
2 files changed, 10 insertions, 1 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 1186a40..e6e350d 100644
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,8 @@
+2018-10-31 Martin Liska <mliska@suse.cz>
+
+ * trans-decl.c (struct module_hasher): Call htab_hash_string
+ for s->name and not for s.
+
2018-10-30 Thomas Koenig <tkoenig@gcc.gnu.org>
PR fortran/85896
diff --git a/gcc/fortran/trans-decl.c b/gcc/fortran/trans-decl.c
index 88f9f57..83cbcd1 100644
--- a/gcc/fortran/trans-decl.c
+++ b/gcc/fortran/trans-decl.c
@@ -4825,7 +4825,11 @@ struct module_hasher : ggc_ptr_hash<module_htab_entry>
{
typedef const char *compare_type;
- static hashval_t hash (module_htab_entry *s) { return htab_hash_string (s); }
+ static hashval_t hash (module_htab_entry *s)
+ {
+ return htab_hash_string (s->name);
+ }
+
static bool
equal (module_htab_entry *a, const char *b)
{