【发布时间】：2013-02-27 09:05:10
【问题描述】：
我不明白为什么如果bar 字段存在于containerType 中，则以下程序会出现SIGSEGV 段错误，并且如果将其注释掉则可以正常工作。我在 x86_64 上，同时使用 gfortran-4.4.6 和 gfortran-4.6.3 进行编译。
据我了解，使用指向 containerType 的指针应该强制在堆上分配包含的大数组，但似乎并非如此。在可执行文件上运行 valgrind 给了我
Warning: client switching stacks? SP change: 0x7ff000448 --> 0x7fe0603f8
to suppress, use: --max-stackframe=16384080 or greater
（输出的其余部分恕我直言不相关，但如果需要我可以编辑它）。这向我表明存在堆栈溢出；大概是由于在堆栈上分配了 8*8*8*4000 * 8(bytes per real) = 16384000 bytes。
当我注释掉 bar 字段时，valgrind 非常高兴。更奇怪的是，在 gfortran-4.6.3 下使用 '-O' 编译也会使问题消失（但不是在 gfortran-4.4.6 下）。
要么我偶然发现了一个编译器错误，要么（更有可能，因为我对 Fortran 还很陌生）我不明白数据的分配位置。有人能告诉我这是怎么回事吗？
有问题的代码：
main.f90：
program main
use problematicArray
implicit none
type (containerType),pointer :: container
allocate(container)
container%foo%arrayData = 17.0
write(*,*) container%foo%arrayData(7,7,7,100)
deallocate(container)
write(*,*) 'Program finished'
end program main
problematicArray.f90：
module problematicArray
implicit none
private
integer, parameter, public :: dim1 = 4000
type, public :: typeWith4DArray
real(8), dimension(8,8,8,dim1) :: arrayData
end type typeWith4DArray
type :: typeWithChars
character(4), dimension(:), allocatable :: charData
end type typeWithChars
type, public :: containerType
type(typeWith4DArray) :: foo
type(typeWithChars) :: bar
end type containerType
end module problematicArray
【问题讨论】：
标签： memory-management fortran gfortran