https://gcc.gnu.org/g:9e8395708c0027ad1de871bae870c4b0185a74fd
commit 9e8395708c0027ad1de871bae870c4b0185a74fd
Author: Tobias Burnus <tob...@codesourcery.com>
Date: Fri Aug 21 13:28:06 2020 +0200
Update dg-* in gfortran.dg/gomp/pr67500.f90
Contrary to GCC 11, OG10 uses an error instead of a warning,
cf. commit 271c7fef548a86676d304b1eb2be5c0d47280bd6.
gcc/testsuite/
* gfortran.dg/gomp/pr67500.f90: Change dg-warning to
dg-error.
Diff:
---
gcc/testsuite/ChangeLog.omp | 5 +++++
gcc/testsuite/gfortran.dg/gomp/pr67500.f90 | 8 ++++----
2 files changed, 9 insertions(+), 4 deletions(-)
diff --git a/gcc/testsuite/ChangeLog.omp b/gcc/testsuite/ChangeLog.omp
index 09f26c50472..1ac91cf1b01 100644
--- a/gcc/testsuite/ChangeLog.omp
+++ b/gcc/testsuite/ChangeLog.omp
@@ -1,3 +1,8 @@
+2020-08-21 Tobias Burnus <tob...@codesourcery.com>
+
+ * gfortran.dg/gomp/pr67500.f90: Change dg-warning to
+ dg-error.
+
2020-06-02 Kwok Cheung Yeung <k...@codesourcery.com>
* c-c++-common/goacc/noncontig_array-1.c: Dump Gimple pass.
diff --git a/gcc/testsuite/gfortran.dg/gomp/pr67500.f90
b/gcc/testsuite/gfortran.dg/gomp/pr67500.f90
index 1cecdc48578..11ed69f10a7 100644
--- a/gcc/testsuite/gfortran.dg/gomp/pr67500.f90
+++ b/gcc/testsuite/gfortran.dg/gomp/pr67500.f90
@@ -10,11 +10,11 @@ subroutine f2
end
subroutine f3 (i)
- !$omp declare simd simdlen(-2) ! { dg-warning "INTEGER expression of
SIMDLEN clause at .1. must be positive" }
+ !$omp declare simd simdlen(-2) ! { dg-error "INTEGER expression of SIMDLEN
clause at .1. must be positive" }
end subroutine
subroutine f4
- !$omp declare simd simdlen(0) ! { dg-warning "INTEGER expression
of SIMDLEN clause at .1. must be positive" }
+ !$omp declare simd simdlen(0) ! { dg-error "INTEGER expression of
SIMDLEN clause at .1. must be positive" }
end
subroutine foo(p, d, n)
@@ -31,11 +31,11 @@ subroutine foo(p, d, n)
do i = 1, 16
end do
- !$omp simd safelen(-2) ! { dg-warning "INTEGER expression of SAFELEN
clause at .1. must be positive" }
+ !$omp simd safelen(-2) ! { dg-error "INTEGER expression of SAFELEN clause
at .1. must be positive" }
do i = 1, 16
end do
- !$omp simd safelen(0) ! { dg-warning "INTEGER expression of SAFELEN
clause at .1. must be positive" }
+ !$omp simd safelen(0) ! { dg-error "INTEGER expression of SAFELEN clause
at .1. must be positive" }
do i = 1, 16
end do
