! { dg-additional-options -Wuninitialized } | |
type t2 | |
integer :: bar | |
end type t2 | |
type t | |
type(t2), pointer :: foo | |
end type t | |
type(t) :: c | |
! { dg-note {'c' declared here} {} { target *-*-* } .-1 } | |
!$acc enter data copyin(c%foo) | |
! { dg-warning {'c\.foo' is used uninitialized} {} { target *-*-* } .-1 } | |
end |