diff options
author | Mikael Morin <mikael.morin@tele2.fr> | 2008-11-16 21:44:33 +0100 |
---|---|---|
committer | Mikael Morin <mikael@gcc.gnu.org> | 2008-11-16 20:44:33 +0000 |
commit | 27f31e397edbaa44a6ab0d68af7799ea3f482755 (patch) | |
tree | 6d13df743abbd4b43ab0b67872d02dcdfb44bdc3 /gcc/fortran/resolve.c | |
parent | 7cc003b5c2ebc9b2573ab75fc1a18874c7288b63 (diff) | |
download | gcc-27f31e397edbaa44a6ab0d68af7799ea3f482755.zip gcc-27f31e397edbaa44a6ab0d68af7799ea3f482755.tar.gz gcc-27f31e397edbaa44a6ab0d68af7799ea3f482755.tar.bz2 |
re PR fortran/37992 (ICE while resolving charlen for rejected statements)
2008-11-16 Mikael Morin <mikael.morin@tele2.fr>
PR fortran/37992
* gfortran.h (gfc_namespace): Added member old_cl_list,
backup of cl_list.
(gfc_free_charlen): Added prototype.
* symbol.c (gfc_free_charlen): New function.
(gfc_free_namespace): Use gfc_free_charlen.
* parse.c (next_statement): Backup gfc_current_ns->cl_list.
(reject_statement): Restore gfc_current_ns->cl_list.
Free cl_list's elements before dropping them.
2008-11-16 Mikael Morin <mikael.morin@tele2.fr>
PR fortran/37992
* gfotran.dg/charlen_free_1.f90: New test.
From-SVN: r141927
Diffstat (limited to 'gcc/fortran/resolve.c')
0 files changed, 0 insertions, 0 deletions