! PR middle-end/107236

! Did ICE before because IFN .GOMP_TARGET_REV was not
! processed in omp-offload.cc.
! Note: Test required ENABLE_OFFLOADING being true inside GCC.

implicit none
!$omp requires reverse_offload
!$omp target parallel num_threads(4)
  !$omp target device(ancestor:1)
    call foo()
  !$omp end target 
!$omp end target parallel
contains
  subroutine foo
  end
end