nvptx, libgfortran: Switch out of "minimal" mode

[official-gcc.git] / gcc / testsuite / gfortran.dg / pr39695_1.f90

! { dg-do compile }
!

function f()
  intrinsic :: sin
  procedure(sin), pointer :: f ! { dg-error "Procedure pointer 'f'" }
  f => sin
end function f