[PR88420] Fortran OpenACC "Clause SEQ conflicts with INDEPENDENT"
The Fortran front end declares that the OpenACC "Clause SEQ conflicts with INDEPENDENT". While that combination doesn't make too much sense indeed, it's still valid; these are orthogonal concepts. gcc/fortran/ PR fortran/88420 * openmp.c (resolve_oacc_loop_blocks): Remove "Clause SEQ conflicts with INDEPENDENT" diagnostic. gcc/testsuite/ PR fortran/88420 * gfortran.dg/goacc/loop-1-2.f95: Update. * gfortran.dg/goacc/loop-1.f95: Likewise. From-SVN: r266920
This commit is contained in:
parent
84ca08d2d5
commit
b22b7d462e
@ -1,3 +1,9 @@
|
||||
2018-12-09 Thomas Schwinge <thomas@codesourcery.com>
|
||||
|
||||
PR fortran/88420
|
||||
* openmp.c (resolve_oacc_loop_blocks): Remove "Clause SEQ
|
||||
conflicts with INDEPENDENT" diagnostic.
|
||||
|
||||
2018-12-08 Steven G. Kargl <kargl@gcc.gnu.org>
|
||||
|
||||
PR fortran/88048
|
||||
|
@ -5895,8 +5895,6 @@ resolve_oacc_loop_blocks (gfc_code *code)
|
||||
|
||||
if (code->ext.omp_clauses->seq)
|
||||
{
|
||||
if (code->ext.omp_clauses->independent)
|
||||
gfc_error ("Clause SEQ conflicts with INDEPENDENT at %L", &code->loc);
|
||||
if (code->ext.omp_clauses->gang)
|
||||
gfc_error ("Clause SEQ conflicts with GANG at %L", &code->loc);
|
||||
if (code->ext.omp_clauses->worker)
|
||||
|
@ -1,3 +1,9 @@
|
||||
2018-12-09 Thomas Schwinge <thomas@codesourcery.com>
|
||||
|
||||
PR fortran/88420
|
||||
* gfortran.dg/goacc/loop-1-2.f95: Update.
|
||||
* gfortran.dg/goacc/loop-1.f95: Likewise.
|
||||
|
||||
2018-12-08 Steven G. Kargl <kargl@gcc.gnu.org>
|
||||
|
||||
PR fortran/88048
|
||||
|
@ -152,8 +152,7 @@ subroutine test1
|
||||
! { dg-error "ACC LOOP iteration variable must be of type integer" "" { target *-*-* } 150 }
|
||||
end do
|
||||
|
||||
! Both seq and independent are not allowed
|
||||
!$acc loop independent seq ! { dg-error "SEQ conflicts with INDEPENDENT" }
|
||||
!$acc loop independent seq
|
||||
do i = 1,10
|
||||
enddo
|
||||
|
||||
|
@ -152,8 +152,7 @@ subroutine test1
|
||||
! { dg-error "ACC LOOP iteration variable must be of type integer" "" { target *-*-* } 150 }
|
||||
end do
|
||||
|
||||
! Both seq and independent are not allowed
|
||||
!$acc loop independent seq ! { dg-error "SEQ conflicts with INDEPENDENT" }
|
||||
!$acc loop independent seq
|
||||
do i = 1,10
|
||||
enddo
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user