mirror of
https://github.com/autc04/Retro68.git
synced 2024-11-30 19:53:46 +00:00
11 lines
148 B
Fortran
11 lines
148 B
Fortran
! { dg-shouldfail "" { *-*-* } { "*" } { "" } }
|
|
|
|
program main
|
|
implicit none
|
|
|
|
!$acc parallel
|
|
call abort
|
|
!$acc end parallel
|
|
|
|
end program main
|