public inbox for gcc-cvs@sourceware.org
help / color / mirror / Atom feed
From: Thomas Schwinge <tschwinge@gcc.gnu.org>
To: gcc-cvs@gcc.gnu.org
Subject: [gcc/devel/omp/gcc-12] XFAIL some OpenACC 'kernels' confusion in 'libgomp.oacc-fortran/declare-allocatable-1*.f90'
Date: Wed, 2 Nov 2022 21:07:56 +0000 (GMT) [thread overview]
Message-ID: <20221102210756.A8435385742D@sourceware.org> (raw)
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
reply other threads:[~2022-11-02 21:07 UTC|newest]
Thread overview: [no followups] expand[flat|nested] mbox.gz Atom feed
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=20221102210756.A8435385742D@sourceware.org \
--to=tschwinge@gcc.gnu.org \
--cc=gcc-cvs@gcc.gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
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).