public inbox for gcc-cvs@sourceware.org
help / color / mirror / Atom feed
* [gcc/devel/omp/gcc-12] XFAIL some OpenACC 'kernels' confusion in 'libgomp.oacc-fortran/declare-allocatable-1*.f90'
@ 2022-11-02 21:07 Thomas Schwinge
  0 siblings, 0 replies; only message in thread
From: Thomas Schwinge @ 2022-11-02 21:07 UTC (permalink / raw)
  To: gcc-cvs

https://gcc.gnu.org/g:5a3111c3d60ee8e8630f1f6ed200b0b4e0c5e490

commit 5a3111c3d60ee8e8630f1f6ed200b0b4e0c5e490
Author: Thomas Schwinge <thomas@codesourcery.com>
Date:   Wed Nov 2 15:44:46 2022 +0100

    XFAIL some OpenACC 'kernels' confusion in 'libgomp.oacc-fortran/declare-allocatable-1*.f90'
    
    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.

Diff:
---
 libgomp/ChangeLog.omp                                          |  7 +++++++
 .../libgomp.oacc-fortran/declare-allocatable-1-directive.f90   | 10 ++++++++++
 .../libgomp.oacc-fortran/declare-allocatable-1-runtime.f90     | 10 ++++++++++
 .../testsuite/libgomp.oacc-fortran/declare-allocatable-1.f90   | 10 ++++++++++
 4 files changed, 37 insertions(+)

diff --git a/libgomp/ChangeLog.omp b/libgomp/ChangeLog.omp
index 2784b37bf19..38048785174 100644
--- a/libgomp/ChangeLog.omp
+++ b/libgomp/ChangeLog.omp
@@ -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>
 
diff --git a/libgomp/testsuite/libgomp.oacc-fortran/declare-allocatable-1-directive.f90 b/libgomp/testsuite/libgomp.oacc-fortran/declare-allocatable-1-directive.f90
index 759873bad67..6dd6f480519 100644
--- a/libgomp/testsuite/libgomp.oacc-fortran/declare-allocatable-1-directive.f90
+++ b/libgomp/testsuite/libgomp.oacc-fortran/declare-allocatable-1-directive.f90
@@ -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
diff --git a/libgomp/testsuite/libgomp.oacc-fortran/declare-allocatable-1-runtime.f90 b/libgomp/testsuite/libgomp.oacc-fortran/declare-allocatable-1-runtime.f90
index e4cb9c378a3..f86413b6b11 100644
--- a/libgomp/testsuite/libgomp.oacc-fortran/declare-allocatable-1-runtime.f90
+++ b/libgomp/testsuite/libgomp.oacc-fortran/declare-allocatable-1-runtime.f90
@@ -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
diff --git a/libgomp/testsuite/libgomp.oacc-fortran/declare-allocatable-1.f90 b/libgomp/testsuite/libgomp.oacc-fortran/declare-allocatable-1.f90
index 1c8ccd9f61f..fb2ede13465 100644
--- a/libgomp/testsuite/libgomp.oacc-fortran/declare-allocatable-1.f90
+++ b/libgomp/testsuite/libgomp.oacc-fortran/declare-allocatable-1.f90
@@ -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

^ permalink raw reply	[flat|nested] only message in thread

only message in thread, other threads:[~2022-11-02 21:07 UTC | newest]

Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2022-11-02 21:07 [gcc/devel/omp/gcc-12] XFAIL some OpenACC 'kernels' confusion in 'libgomp.oacc-fortran/declare-allocatable-1*.f90' Thomas Schwinge

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).