diff options
author | Martin Liska <mliska@suse.cz> | 2018-10-31 11:59:34 +0100 |
---|---|---|
committer | Martin Liska <marxin@gcc.gnu.org> | 2018-10-31 10:59:34 +0000 |
commit | 2e71b5714df37470cbfa44eb1faefd4e1bc22648 (patch) | |
tree | 2be1c8afeeb3147e114b0134ff8a7027cf99bbbe | |
parent | 6dc8ee419ea91a2641e35b7b00b81639f5bb4a8e (diff) | |
download | gcc-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/ChangeLog | 5 | ||||
-rw-r--r-- | gcc/fortran/trans-decl.c | 6 |
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) { |