2008-11-16 Mikael Morin <mikael.morin@tele2.fr>
authormikael <mikael@138bc75d-0d04-0410-961f-82ee72b054a4>
Sun, 16 Nov 2008 20:44:33 +0000 (20:44 +0000)
committermikael <mikael@138bc75d-0d04-0410-961f-82ee72b054a4>
Sun, 16 Nov 2008 20:44:33 +0000 (20:44 +0000)
commit8fbaefb97c0e10dbf6069dd6d843003ff9396aca
tree6d13df743abbd4b43ab0b67872d02dcdfb44bdc3
parentd0bf91a56242cab679ec0502ceb8fada581ef46d
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.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@141927 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/fortran/ChangeLog
gcc/fortran/gfortran.h
gcc/fortran/parse.c
gcc/fortran/symbol.c
gcc/testsuite/ChangeLog