Message ID | d62b1071-c932-ba9d-0b4b-d4a878ee9283@suse.cz |
---|---|
State | New |
Headers | show |
Series | [OBVIOUS] Fix hash-table violation in trans-decl.c. | expand |
diff --git a/gcc/fortran/trans-decl.c b/gcc/fortran/trans-decl.c index 88f9f570725..83cbcd123fe 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) {