blob: 4813aacfdc325c8ebb0e617acfed64b3243bb163 [file] [log] [blame]
! PR fortran/71705
! { dg-do compile }
real :: x
x = 0.0
!$omp target update to(x)
end