xref: /dports/lang/gcc11-devel/gcc-11-20211009/gcc/testsuite/gfortran.dg/gomp/map-2.f90

type t
  integer :: i
end type t
type(t) v
!$omp target enter data map(to:v%i, v%i)
end