rs6000.md (floor<mode>2): Add support for IEEE 128-bit round to integer instructions.

[official-gcc.git] / libgomp / testsuite / libgomp.oacc-fortran / abort-2.f90

program main
  implicit none

  integer :: argc
  argc = command_argument_count ()

  !$acc parallel copyin(argc)
  if (argc .ne. 0) then
     call abort
  end if
  !$acc end parallel

end program main