大きな配列コンポーネントを持つFortran派生データ型のセグメンテーションフォールト

Question

NDが大きい（1000000）場合、次のコードがセグメンテーションフォルトを生成する理由を説明できますか？スタック制限を増やしても効果はありません。

module parametros_mod 
    integer, parameter :: ND = 1000000 
end module parametros_mod 

module data_mod 
    use parametros_mod 
    implicit none 
    private 

    type, public :: data_vec 
    real(8) :: f0 
    real(8), dimension(ND) :: fvec 
    end type data_vec 
end module data_mod 

!test program 
program test 
    use parametros_mod 
    use data_mod 
    implicit none 

    type(data_vec) :: v1 
    real(8), dimension(ND) :: rv, xv 

    rv = 0d0 
    rv(2) = 1d0 

    v1 = data_vec(1.1d0,rv) 
    xv = v1%fvec 
    write(*,'(*(f0.4,2x))') xv(1:3) 
end program test 

Answer 1

私はあなたのエラーを複製しましたが、私は大きいNDを使用しなければなりませんでした。それは実際に行です

v1 = data_vec(1.1d0,rv) 

おそらく一時オブジェクトがスタック上に作成されます。

あなたはcompnentsに

v1%f0 = 1.1d0 
v1%fvec = rv