]> git.ipfire.org Git - thirdparty/gcc.git/commitdiff
XFAIL some OpenACC 'kernels' confusion in 'libgomp.oacc-fortran/declare-allocatable...
authorThomas Schwinge <thomas@codesourcery.com>
Wed, 2 Nov 2022 14:44:46 +0000 (15:44 +0100)
committerThomas Schwinge <thomas@codesourcery.com>
Wed, 2 Nov 2022 20:55:00 +0000 (21:55 +0100)
Seen only for certain optimizations levels, as indicated; so there are a few
XPASSes otherwise.

There are neither OpenACC 'kernels' constructs here, nor other 'loop'
constructs with 'auto' clause, so I'm not sure what's going on.

libgomp/
* testsuite/libgomp.oacc-fortran/declare-allocatable-1-directive.f90:
XFAIL some OpenACC 'kernels' confusion.
* testsuite/libgomp.oacc-fortran/declare-allocatable-1-runtime.f90:
Likewise.
* testsuite/libgomp.oacc-fortran/declare-allocatable-1.f90:
Likewise.

libgomp/ChangeLog.omp
libgomp/testsuite/libgomp.oacc-fortran/declare-allocatable-1-directive.f90
libgomp/testsuite/libgomp.oacc-fortran/declare-allocatable-1-runtime.f90
libgomp/testsuite/libgomp.oacc-fortran/declare-allocatable-1.f90

index 2784b37bf19804b35ee0fd8d7eb7c2e5a2411993..38048785174a7d9e2f83493ad8a02fe4584c99c3 100644 (file)
@@ -1,5 +1,12 @@
 2022-11-02  Thomas Schwinge  <thomas@codesourcery.com>
 
+       * testsuite/libgomp.oacc-fortran/declare-allocatable-1-directive.f90:
+       XFAIL some OpenACC 'kernels' confusion.
+       * testsuite/libgomp.oacc-fortran/declare-allocatable-1-runtime.f90:
+       Likewise.
+       * testsuite/libgomp.oacc-fortran/declare-allocatable-1.f90:
+       Likewise.
+
        Backported from master:
        2022-11-02  Thomas Schwinge  <thomas@codesourcery.com>
 
index 759873bad67551fa8d30cc68e2405a506652eed2..6dd6f48051998f72abd9e24161c03e79b71e5ef7 100644 (file)
@@ -79,6 +79,8 @@ program test
   !   { dg-note {variable 'i' ought to be adjusted for OpenACC privatization level: 'vector'} {} { target *-*-* } l$c }
   !   { dg-note {variable 'i' adjusted for OpenACC privatization level: 'vector'} {} { target { ! openacc_host_selected } } l$c }
   ! { dg-note {variable 'i\.[0-9]+' in 'private' clause isn't candidate for adjusting OpenACC privatization level: not addressable} {} { target *-*-* } l$c }
+  ! { dg-bogus {missed: 'auto' loop has not been analyzed} TODO { xfail __OPTIMIZE__ } l$c }
+  !   '-O1', '-O3', '-Os' only.
   ! { dg-optimized {assigned OpenACC gang vector loop parallelism} {} { target *-*-* } l$c }
   do i = 1, n
      b(i) = i * a
@@ -152,6 +154,8 @@ program test
   !   { dg-note {variable 'i' ought to be adjusted for OpenACC privatization level: 'vector'} {} { target *-*-* } l$c }
   !   { dg-note {variable 'i' adjusted for OpenACC privatization level: 'vector'} {} { target { ! openacc_host_selected } } l$c }
   ! { dg-note {variable 'i\.[0-9]+' in 'private' clause isn't candidate for adjusting OpenACC privatization level: not addressable} {} { target *-*-* } l$c }
+  ! { dg-bogus {missed: 'auto' loop has not been analyzed} TODO { xfail __OPTIMIZE__ } l$c }
+  !   '-O1', '-O2', '-O3', '-Os' only.
   ! { dg-optimized {assigned OpenACC gang vector loop parallelism} {} { target *-*-* } l$c }
   do i = 1, n
      b(i) = 1.0
@@ -162,6 +166,8 @@ program test
   !   { dg-note {variable 'i' ought to be adjusted for OpenACC privatization level: 'vector'} {} { target *-*-* } l$c }
   !   { dg-note {variable 'i' adjusted for OpenACC privatization level: 'vector'} {} { target { ! openacc_host_selected } } l$c }
   ! { dg-note {variable 'i\.[0-9]+' in 'private' clause isn't candidate for adjusting OpenACC privatization level: not addressable} {} { target *-*-* } l$c }
+  ! { dg-bogus {missed: 'auto' loop has not been analyzed} TODO { xfail __OPTIMIZE__ } l$c }
+  !   '-O1', '-O3', '-Os' only.
   ! { dg-optimized {assigned OpenACC gang vector loop parallelism} {} { target *-*-* } l$c }
   do i = 1, n
      b(i) = fun1 (i) ! { dg-line l[incr c] }
@@ -193,6 +199,8 @@ program test
   !   { dg-note {variable 'i' ought to be adjusted for OpenACC privatization level: 'vector'} {} { target *-*-* } l$c }
   !   { dg-note {variable 'i' adjusted for OpenACC privatization level: 'vector'} {} { target { ! openacc_host_selected } } l$c }
   ! { dg-note {variable 'i\.[0-9]+' in 'private' clause isn't candidate for adjusting OpenACC privatization level: not addressable} {} { target *-*-* } l$c }
+  ! { dg-bogus {missed: 'auto' loop has not been analyzed} TODO { xfail __OPTIMIZE__ } l$c }
+  !   '-O1', '-O3', '-Os' only.
   ! { dg-optimized {assigned OpenACC gang vector loop parallelism} {} { target *-*-* } l$c }
   do i = 1, n
      b(i) = 1.0
@@ -250,6 +258,8 @@ subroutine sub2
 
   !$acc parallel loop ! { dg-line l[incr c] }
   ! { dg-note {variable 'i' in 'private' clause isn't candidate for adjusting OpenACC privatization level: not addressable} {} { target *-*-* } l$c }
+  ! { dg-bogus {missed: 'auto' loop has not been analyzed} TODO { xfail __OPTIMIZE__ } l$c }
+  !   '-O1', '-O3', '-Os' only.
   ! { dg-optimized {assigned OpenACC gang vector loop parallelism} {} { target *-*-* } l$c }
   do i = 1, n
      b(i) = 1.0
index e4cb9c378a34b29d5d19dd8a80cc52dab48a02c9..f86413b6b11ff9cd6944615de6feafc12ac79820 100644 (file)
@@ -79,6 +79,8 @@ program test
   !   { dg-note {variable 'i' ought to be adjusted for OpenACC privatization level: 'vector'} {} { target *-*-* } l$c }
   !   { dg-note {variable 'i' adjusted for OpenACC privatization level: 'vector'} {} { target { ! openacc_host_selected } } l$c }
   ! { dg-note {variable 'i\.[0-9]+' in 'private' clause isn't candidate for adjusting OpenACC privatization level: not addressable} {} { target *-*-* } l$c }
+  ! { dg-bogus {missed: 'auto' loop has not been analyzed} TODO { xfail __OPTIMIZE__ } l$c }
+  !   '-O1', '-O3', '-Os' only.
   ! { dg-optimized {assigned OpenACC gang vector loop parallelism} {} { target *-*-* } l$c }
   do i = 1, n
      b(i) = i * a
@@ -152,6 +154,8 @@ program test
   !   { dg-note {variable 'i' ought to be adjusted for OpenACC privatization level: 'vector'} {} { target *-*-* } l$c }
   !   { dg-note {variable 'i' adjusted for OpenACC privatization level: 'vector'} {} { target { ! openacc_host_selected } } l$c }
   ! { dg-note {variable 'i\.[0-9]+' in 'private' clause isn't candidate for adjusting OpenACC privatization level: not addressable} {} { target *-*-* } l$c }
+  ! { dg-bogus {missed: 'auto' loop has not been analyzed} TODO { xfail __OPTIMIZE__ } l$c }
+  !   '-O1', '-O2', '-O3', '-Os' only.
   ! { dg-optimized {assigned OpenACC gang vector loop parallelism} {} { target *-*-* } l$c }
   do i = 1, n
      b(i) = 1.0
@@ -162,6 +166,8 @@ program test
   !   { dg-note {variable 'i' ought to be adjusted for OpenACC privatization level: 'vector'} {} { target *-*-* } l$c }
   !   { dg-note {variable 'i' adjusted for OpenACC privatization level: 'vector'} {} { target { ! openacc_host_selected } } l$c }
   ! { dg-note {variable 'i\.[0-9]+' in 'private' clause isn't candidate for adjusting OpenACC privatization level: not addressable} {} { target *-*-* } l$c }
+  ! { dg-bogus {missed: 'auto' loop has not been analyzed} TODO { xfail __OPTIMIZE__ } l$c }
+  !   '-O1', '-O3', '-Os' only.
   ! { dg-optimized {assigned OpenACC gang vector loop parallelism} {} { target *-*-* } l$c }
   do i = 1, n
      b(i) = fun1 (i) ! { dg-line l[incr c] }
@@ -193,6 +199,8 @@ program test
   !   { dg-note {variable 'i' ought to be adjusted for OpenACC privatization level: 'vector'} {} { target *-*-* } l$c }
   !   { dg-note {variable 'i' adjusted for OpenACC privatization level: 'vector'} {} { target { ! openacc_host_selected } } l$c }
   ! { dg-note {variable 'i\.[0-9]+' in 'private' clause isn't candidate for adjusting OpenACC privatization level: not addressable} {} { target *-*-* } l$c }
+  ! { dg-bogus {missed: 'auto' loop has not been analyzed} TODO { xfail __OPTIMIZE__ } l$c }
+  !   '-O1', '-O3', '-Os' only.
   ! { dg-optimized {assigned OpenACC gang vector loop parallelism} {} { target *-*-* } l$c }
   do i = 1, n
      b(i) = 1.0
@@ -250,6 +258,8 @@ subroutine sub2
 
   !$acc parallel loop ! { dg-line l[incr c] }
   ! { dg-note {variable 'i' in 'private' clause isn't candidate for adjusting OpenACC privatization level: not addressable} {} { target *-*-* } l$c }
+  ! { dg-bogus {missed: 'auto' loop has not been analyzed} TODO { xfail __OPTIMIZE__ } l$c }
+  !   '-O1', '-O3', '-Os' only.
   ! { dg-optimized {assigned OpenACC gang vector loop parallelism} {} { target *-*-* } l$c }
   do i = 1, n
      b(i) = 1.0
index 1c8ccd9f61f25f874d3f846d564731b992859601..fb2ede1346596243bd08489ae4c187ee6b5d6e00 100644 (file)
@@ -78,6 +78,8 @@ program test
   !   { dg-note {variable 'i' ought to be adjusted for OpenACC privatization level: 'vector'} {} { target *-*-* } l$c }
   !   { dg-note {variable 'i' adjusted for OpenACC privatization level: 'vector'} {} { target { ! openacc_host_selected } } l$c }
   ! { dg-note {variable 'i\.[0-9]+' in 'private' clause isn't candidate for adjusting OpenACC privatization level: not addressable} {} { target *-*-* } l$c }
+  ! { dg-bogus {missed: 'auto' loop has not been analyzed} TODO { xfail __OPTIMIZE__ } l$c }
+  !   '-O1', '-O3', '-Os' only.
   ! { dg-optimized {assigned OpenACC gang vector loop parallelism} {} { target *-*-* } l$c }
   do i = 1, n
      b(i) = i * a
@@ -146,6 +148,8 @@ program test
   !   { dg-note {variable 'i' ought to be adjusted for OpenACC privatization level: 'vector'} {} { target *-*-* } l$c }
   !   { dg-note {variable 'i' adjusted for OpenACC privatization level: 'vector'} {} { target { ! openacc_host_selected } } l$c }
   ! { dg-note {variable 'i\.[0-9]+' in 'private' clause isn't candidate for adjusting OpenACC privatization level: not addressable} {} { target *-*-* } l$c }
+  ! { dg-bogus {missed: 'auto' loop has not been analyzed} TODO { xfail __OPTIMIZE__ } l$c }
+  !   '-O1', '-O2', '-O3', '-Os' only.
   ! { dg-optimized {assigned OpenACC gang vector loop parallelism} {} { target *-*-* } l$c }
   do i = 1, n
      b(i) = 1.0
@@ -156,6 +160,8 @@ program test
   !   { dg-note {variable 'i' ought to be adjusted for OpenACC privatization level: 'vector'} {} { target *-*-* } l$c }
   !   { dg-note {variable 'i' adjusted for OpenACC privatization level: 'vector'} {} { target { ! openacc_host_selected } } l$c }
   ! { dg-note {variable 'i\.[0-9]+' in 'private' clause isn't candidate for adjusting OpenACC privatization level: not addressable} {} { target *-*-* } l$c }
+  ! { dg-bogus {missed: 'auto' loop has not been analyzed} TODO { xfail __OPTIMIZE__ } l$c }
+  !   '-O1', '-O3', '-Os' only.
   ! { dg-optimized {assigned OpenACC gang vector loop parallelism} {} { target *-*-* } l$c }
   do i = 1, n
      b(i) = fun1 (i) ! { dg-line l[incr c] }
@@ -185,6 +191,8 @@ program test
   !   { dg-note {variable 'i' ought to be adjusted for OpenACC privatization level: 'vector'} {} { target *-*-* } l$c }
   !   { dg-note {variable 'i' adjusted for OpenACC privatization level: 'vector'} {} { target { ! openacc_host_selected } } l$c }
   ! { dg-note {variable 'i\.[0-9]+' in 'private' clause isn't candidate for adjusting OpenACC privatization level: not addressable} {} { target *-*-* } l$c }
+  ! { dg-bogus {missed: 'auto' loop has not been analyzed} TODO { xfail __OPTIMIZE__ } l$c }
+  !   '-O1', '-O3', '-Os' only.
   ! { dg-optimized {assigned OpenACC gang vector loop parallelism} {} { target *-*-* } l$c }
   do i = 1, n
      b(i) = 1.0
@@ -240,6 +248,8 @@ subroutine sub2
 
   !$acc parallel loop ! { dg-line l[incr c] }
   ! { dg-note {variable 'i' in 'private' clause isn't candidate for adjusting OpenACC privatization level: not addressable} {} { target *-*-* } l$c }
+  ! { dg-bogus {missed: 'auto' loop has not been analyzed} TODO { xfail __OPTIMIZE__ } l$c }
+  !   '-O1', '-O3', '-Os' only.
   ! { dg-optimized {assigned OpenACC gang vector loop parallelism} {} { target *-*-* } l$c }
   do i = 1, n
      b(i) = 1.0