| commit | 4fa0269222763d9fa5a478a90e690b90eafff14d | |
| author | Janus Weil <janus@gcc.gnu.org> | |
| Fri, 31 Dec 2010 10:08:17 +0000 (31 11:08 +0100) | ||
| committer | Janus Weil <janus@gcc.gnu.org> | |
| Fri, 31 Dec 2010 10:08:17 +0000 (31 11:08 +0100) | ||
| tree | 54d9b78aff752dd100d6afe96eece73b56bad324 | treesnapshot (tar.gz zip) |
| parent | 6c2154a91776cec9f01875d4f583bd7d8cd087a1 | commitdiff |
re PR fortran/46971 ([OOP] ICE on long class names)
2010-12-31 Janus Weil <janus@gcc.gnu.org>
PR fortran/46971
* gfortran.h (gfc_hash_value): Add prototype.
* class.c (get_unique_type_string): Check if proc_name is present and
make sure string contains an underscore.
(get_unique_hashed_string): New function which creates a hashed string
if the given unique string is too long.
(gfc_hash_value): Moved here from decl.c, renamed and simplified.
(gfc_build_class_symbol, gfc_find_derived_vtab): Use hashed strings.
* decl.c (hash_value): Moved to class.c.
(gfc_match_derived_decl): Renamed 'hash_value'.
2010-12-31 Janus Weil <janus@gcc.gnu.org>
PR fortran/46971
* gfortran.dg/class_33.f90: New.
From-SVN: r168363
2010-12-31 Janus Weil <janus@gcc.gnu.org>
PR fortran/46971
* gfortran.h (gfc_hash_value): Add prototype.
* class.c (get_unique_type_string): Check if proc_name is present and
make sure string contains an underscore.
(get_unique_hashed_string): New function which creates a hashed string
if the given unique string is too long.
(gfc_hash_value): Moved here from decl.c, renamed and simplified.
(gfc_build_class_symbol, gfc_find_derived_vtab): Use hashed strings.
* decl.c (hash_value): Moved to class.c.
(gfc_match_derived_decl): Renamed 'hash_value'.
2010-12-31 Janus Weil <janus@gcc.gnu.org>
PR fortran/46971
* gfortran.dg/class_33.f90: New.
From-SVN: r168363