081e202c8e
Ensure that the values in a DATA-like default component initialization pass through expression analysis. Fixes https://github.com/llvm/llvm-project/issues/81097.
8 lines
242 B
Fortran
8 lines
242 B
Fortran
! RUN: %flang_fc1 -fdebug-dump-symbols %s 2>&1 | FileCheck %s
|
|
! Ensure that DATA-like default component initializers work.
|
|
! CHECK: j (InDataStmt) size=4 offset=0: ObjectEntity type: INTEGER(4) init:123_4
|
|
type t
|
|
integer j/123/
|
|
end type
|
|
end
|