re PR fortran/33375 (ICE (segfault) gfortran.dg/common_6.f90)
authorH.J. Lu <hongjiu.lu@intel.com>
Fri, 18 Jan 2008 01:29:11 +0000 (01:29 +0000)
committerH.J. Lu <hjl@gcc.gnu.org>
Fri, 18 Jan 2008 01:29:11 +0000 (17:29 -0800)
commitc0184444694a44ea62d46f1ea90a6a47e8997174
tree6618a99f503007bf9db19e45175332fb41f54b0e
parent5cc5439e27c65911e1af867dd2804b0f0dd48f5e
re PR fortran/33375 (ICE (segfault) gfortran.dg/common_6.f90)

2008-01-17  H.J. Lu  <hongjiu.lu@intel.com>

PR fortran/33375
* symbol.c (free_common_tree): Renamed to ...
(gfc_free_common_tree): This.  Remove static.
(gfc_free_namespace): Updated.

* gfortran.h (gfc_free_common_tree): New.

* match.c (gfc_match_common): Call gfc_free_common_tree () with
gfc_current_ns->common_root and set gfc_current_ns->common_root
to NULL on syntax error.

From-SVN: r131621
gcc/fortran/ChangeLog
gcc/fortran/gfortran.h
gcc/fortran/match.c
gcc/fortran/symbol.c