[Bug fortran/58803] New: free_components deallocates twice pointer p->tb at symbol.c:2068

["zeccav at gmail dot com" <gcc-bugzilla at gcc dot gnu dot org>]

http://gcc.gnu.org/bugzilla/show_bug.cgi?id=58803

            Bug ID: 58803
           Summary: free_components deallocates twice pointer p->tb at
                    symbol.c:2068
           Product: gcc
           Version: 4.8.2
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: zeccav at gmail dot com

! free_components deallocates twice pointer p->tb at symbol.c:2068
! you may double check with "export MALLOC_CHECK_=2"
      type t
       procedure(real), pointer, nopass  :: f1, f2
      end type
      end
*** Error in
`/home/vitti/local/gcc-4.8.2/libexec/gcc/x86_64-unknown-linux-gnu/4.8.2/f951':
free(): invalid pointer: 0x0000000002150b00 ***
with export MALLOC_CHECK_=2 I get the following

[vitti f95]$gfortran gfbug98.f
gfbug98.f:6:0: internal compiler error: Aborted
       end
 ^
0x869b1f crash_signal
    ../../gcc-4.8.2/gcc/toplev.c:332
0x581eb0 free_components
    ../../gcc-4.8.2/gcc/fortran/symbol.c:2068
0x581eb0 gfc_free_symbol(gfc_symbol*)
    ../../gcc-4.8.2/gcc/fortran/symbol.c:2496
0x582063 free_sym_tree
    ../../gcc-4.8.2/gcc/fortran/symbol.c:3302
0x58205a free_sym_tree
    ../../gcc-4.8.2/gcc/fortran/symbol.c:3300
0x582051 free_sym_tree
    ../../gcc-4.8.2/gcc/fortran/symbol.c:3299
0x581d1a gfc_free_namespace(gfc_namespace*)
    ../../gcc-4.8.2/gcc/fortran/symbol.c:3465
0x5822cf gfc_symbol_done_2()
    ../../gcc-4.8.2/gcc/fortran/symbol.c:3507
0x53f288 gfc_done_2()
    ../../gcc-4.8.2/gcc/fortran/misc.c:267
0x5527f9 translate_all_program_units
    ../../gcc-4.8.2/gcc/fortran/parse.c:4493
0x5527f9 gfc_parse_file()
    ../../gcc-4.8.2/gcc/fortran/parse.c:4688
0x58e195 gfc_be_parse_file
    ../../gcc-4.8.2/gcc/fortran/f95-lang.c:189
Please submit a full bug report,
with preprocessed source if appropriate.
Please include the complete backtrace with any bug report.