re PR fortran/46971 ([OOP] ICE on long class names)
authorJanus Weil <janus@gcc.gnu.org>
Fri, 31 Dec 2010 10:08:17 +0000 (11:08 +0100)
committerJanus Weil <janus@gcc.gnu.org>
Fri, 31 Dec 2010 10:08:17 +0000 (11:08 +0100)
commit4fa0269222763d9fa5a478a90e690b90eafff14d
tree54d9b78aff752dd100d6afe96eece73b56bad324
parent6c2154a91776cec9f01875d4f583bd7d8cd087a1
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
gcc/fortran/ChangeLog
gcc/fortran/class.c
gcc/fortran/decl.c
gcc/fortran/gfortran.h
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/class_33.f90 [new file with mode: 0644]