declare-target-1.f90 268 B

12345678910111213141516
  1. ! { dg-do run }
  2. ! { dg-additional-sources declare-target-2.f90 }
  3. module declare_target_1_mod
  4. integer :: var_x
  5. !$omp declare target(var_x)
  6. end module declare_target_1_mod
  7. interface
  8. subroutine foo ()
  9. end subroutine foo
  10. end interface
  11. call foo ()
  12. end