* [testsuite, committed] Add goacc/uninit-if-clause.{c,f95}
@ 2016-03-24 12:40 Tom de Vries
0 siblings, 0 replies; only message in thread
From: Tom de Vries @ 2016-03-24 12:40 UTC (permalink / raw)
To: GCC Patches; +Cc: Thomas Schwinge, Jakub Jelinek
[-- Attachment #1: Type: text/plain, Size: 392 bytes --]
Hi,
I've committed attached patch, which adds testcases that test the
-Wuninitialized warning for the if clause on various openacc directives.
I found an issue with line-numbers of the warning in C++, which I've
filed as PR70392 - '[openacc] inconsistent line numbers in uninitialised
warnings for if clause'.
Some of the warning scans are xfailed in C++ due to that PR.
Thanks,
- Tom
[-- Attachment #2: 0001-Add-goacc-uninit-if-clause.-c-f95.patch --]
[-- Type: text/x-patch, Size: 2577 bytes --]
Add goacc/uninit-if-clause.{c,f95}
2016-03-24 Tom de Vries <tom@codesourcery.com>
* c-c++-common/goacc/uninit-if-clause.c: New test.
* gfortran.dg/goacc/uninit-if-clause.f95: New test.
---
.../c-c++-common/goacc/uninit-if-clause.c | 38 ++++++++++++++++++++++
.../gfortran.dg/goacc/uninit-if-clause.f95 | 20 ++++++++++++
2 files changed, 58 insertions(+)
diff --git a/gcc/testsuite/c-c++-common/goacc/uninit-if-clause.c b/gcc/testsuite/c-c++-common/goacc/uninit-if-clause.c
new file mode 100644
index 0000000..55caa4c
--- /dev/null
+++ b/gcc/testsuite/c-c++-common/goacc/uninit-if-clause.c
@@ -0,0 +1,38 @@
+/* { dg-do compile } */
+/* { dg-additional-options "-Wuninitialized" } */
+/* { dg-excess-errors "PR70392" { xfail c++ } } */
+
+#include <stdbool.h>
+
+int
+main (void)
+{
+ int l, l2, l3, l4;
+ bool b, b2, b3, b4;
+ int i, i2;
+
+ #pragma acc parallel if(l) /* { dg-warning "is used uninitialized in this function" } */
+ ;
+
+ #pragma acc parallel if(b) /* { dg-warning "is used uninitialized in this function" "" { xfail c++ } } */
+ ;
+
+ #pragma acc kernels if(l2) /* { dg-warning "is used uninitialized in this function" } */
+ ;
+
+ #pragma acc kernels if(b2) /* { dg-warning "is used uninitialized in this function" "" { xfail c++ } } */
+ ;
+
+ #pragma acc data if(l3) /* { dg-warning "is used uninitialized in this function" } */
+ ;
+
+ #pragma acc data if(b3) /* { dg-warning "is used uninitialized in this function" "" { xfail c++ } } */
+ ;
+
+ #pragma acc update if(l4) self(i) /* { dg-warning "is used uninitialized in this function" } */
+ ;
+
+ #pragma acc update if(b4) self(i2) /* { dg-warning "is used uninitialized in this function" "" { xfail c++ } } */
+ ;
+
+}
diff --git a/gcc/testsuite/gfortran.dg/goacc/uninit-if-clause.f95 b/gcc/testsuite/gfortran.dg/goacc/uninit-if-clause.f95
new file mode 100644
index 0000000..60dc53e
--- /dev/null
+++ b/gcc/testsuite/gfortran.dg/goacc/uninit-if-clause.f95
@@ -0,0 +1,20 @@
+! { dg-do compile }
+! { dg-additional-options "-Wuninitialized" }
+
+program test
+ implicit none
+ logical :: b, b2, b3, b4
+ integer :: data, data2
+
+ !$acc parallel if(b) ! { dg-warning "is used uninitialized in this function" }
+ !$acc end parallel
+
+ !$acc kernels if(b2) ! { dg-warning "is used uninitialized in this function" }
+ !$acc end kernels
+
+ !$acc data if(b3) ! { dg-warning "is used uninitialized in this function" }
+ !$acc end data
+
+ !$acc update if(b4) self(data2) ! { dg-warning "is used uninitialized in this function" }
+
+end program test
^ permalink raw reply [flat|nested] only message in thread
only message in thread, other threads:[~2016-03-24 12:11 UTC | newest]
Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2016-03-24 12:40 [testsuite, committed] Add goacc/uninit-if-clause.{c,f95} Tom de Vries
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).