http://gcc.gnu.org/bugzilla/show_bug.cgi?id=40850
Brent W. Barker changed:
What|Removed |Added
CC||b.w.barker at gmail dot com
--- Comment #16 from Brent W. Barker 2012-06-06
20:19:57 UTC ---
I found that the following nested deallocation program still fails in 4.6.3.
Sorry it's so long, I don't have time to think about how to shorten it right
now. It compiles and runs without error with ifort 12.1.4 20120410, and I
didn't try it with 4.7.
$ gfortran --version
GNU Fortran (Ubuntu/Linaro 4.6.3-1ubuntu5) 4.6.3
...
$ uname -a
Linux hostname 3.2.0-24-generic #39-Ubuntu SMP Mon May 21 16:52:17 UTC 2012
x86_64 x86_64 x86_64 GNU/Linux
$ gfortran testdealloc.F90
$ ./a.out
*** glibc detected *** ./a.out: double free or corruption (top):
0x01edb0a0 ***
=== Backtrace: =
/lib/x86_64-linux-gnu/libc.so.6(+0x7e626)[0x7fadbf3b1626]
./a.out[0x400fa7]
./a.out[0x401029]
/lib/x86_64-linux-gnu/libc.so.6(__libc_start_main+0xed)[0x7fadbf35476d]
./a.out[0x400709]
=== Memory map:
0040-00402000 r-xp 08:05 132394
/home/barker/sandbox/a.out
00601000-00602000 r--p 1000 08:05 132394
/home/barker/sandbox/a.out
00602000-00603000 rw-p 2000 08:05 132394
/home/barker/sandbox/a.out
01ed8000-01ef9000 rw-p 00:00 0 [heap]
7fadbebed000-7fadbec02000 r-xp 08:05 7340318
/lib/x86_64-linux-gnu/libgcc_s.so.1
7fadbec02000-7fadbee01000 ---p 00015000 08:05 7340318
/lib/x86_64-linux-gnu/libgcc_s.so.1
7fadbee01000-7fadbee02000 r--p 00014000 08:05 7340318
/lib/x86_64-linux-gnu/libgcc_s.so.1
7fadbee02000-7fadbee03000 rw-p 00015000 08:05 7340318
/lib/x86_64-linux-gnu/libgcc_s.so.1
7fadbee03000-7fadbeefc000 r-xp 08:05 7340241
/lib/x86_64-linux-gnu/libm-2.15.so
7fadbeefc000-7fadbf0fb000 ---p 000f9000 08:05 7340241
/lib/x86_64-linux-gnu/libm-2.15.so
7fadbf0fb000-7fadbf0fc000 r--p 000f8000 08:05 7340241
/lib/x86_64-linux-gnu/libm-2.15.so
7fadbf0fc000-7fadbf0fd000 rw-p 000f9000 08:05 7340241
/lib/x86_64-linux-gnu/libm-2.15.so
7fadbf0fd000-7fadbf132000 r-xp 08:05 393626
/usr/lib/x86_64-linux-gnu/libquadmath.so.0.0.0
7fadbf132000-7fadbf331000 ---p 00035000 08:05 393626
/usr/lib/x86_64-linux-gnu/libquadmath.so.0.0.0
7fadbf331000-7fadbf332000 r--p 00034000 08:05 393626
/usr/lib/x86_64-linux-gnu/libquadmath.so.0.0.0
7fadbf332000-7fadbf333000 rw-p 00035000 08:05 393626
/usr/lib/x86_64-linux-gnu/libquadmath.so.0.0.0
7fadbf333000-7fadbf4e6000 r-xp 08:05 7340313
/lib/x86_64-linux-gnu/libc-2.15.so
7fadbf4e6000-7fadbf6e5000 ---p 001b3000 08:05 7340313
/lib/x86_64-linux-gnu/libc-2.15.so
7fadbf6e5000-7fadbf6e9000 r--p 001b2000 08:05 7340313
/lib/x86_64-linux-gnu/libc-2.15.so
7fadbf6e9000-7fadbf6eb000 rw-p 001b6000 08:05 7340313
/lib/x86_64-linux-gnu/libc-2.15.so
7fadbf6eb000-7fadbf6f rw-p 00:00 0
7fadbf6f-7fadbf804000 r-xp 08:05 393401
/usr/lib/x86_64-linux-gnu/libgfortran.so.3.0.0
7fadbf804000-7fadbfa04000 ---p 00114000 08:05 393401
/usr/lib/x86_64-linux-gnu/libgfortran.so.3.0.0
7fadbfa04000-7fadbfa05000 r--p 00114000 08:05 393401
/usr/lib/x86_64-linux-gnu/libgfortran.so.3.0.0
7fadbfa05000-7fadbfa07000 rw-p 00115000 08:05 393401
/usr/lib/x86_64-linux-gnu/libgfortran.so.3.0.0
7fadbfa07000-7fadbfa29000 r-xp 08:05 7340317
/lib/x86_64-linux-gnu/ld-2.15.so
7fadbfc04000-7fadbfc08000 rw-p 00:00 0
7fadbfc26000-7fadbfc29000 rw-p 00:00 0
7fadbfc29000-7fadbfc2a000 r--p 00022000 08:05 7340317
/lib/x86_64-linux-gnu/ld-2.15.so
7fadbfc2a000-7fadbfc2c000 rw-p 00023000 08:05 7340317
/lib/x86_64-linux-gnu/ld-2.15.so
7fff13969000-7fff1398b000 rw-p 00:00 0
[stack]
7fff139d5000-7fff139d6000 r-xp 00:00 0 [vdso]
ff60-ff601000 r-xp 00:00 0
[vsyscall]
Aborted (core dumped)
module class_Foo
implicit none
type :: SubFoo
integer :: num
end type
type :: Foo
class(SubFoo), allocatable :: aSubFoo
end type Foo
type :: SuperFoo
type(Foo), allocatable, dimension(:) :: foos
end type
end module class_Foo
program testdealloc
use class_Foo
implicit none
type(SuperFoo) :: mySuperFoo
type(Foo), allocatable, dimension(:) :: myFoos
type(SubFoo) :: mySubFoo
mySubFoo=SubFoo(1)
all
