[gcc/devel/omp/gcc-12] Update dg-* in gfortran.dg/gomp/pr67500.f90

[gcc/devel/omp/gcc-12] Update dg-* in gfortran.dg/gomp/pr67500.f90

[Kwok Yeung]

https://gcc.gnu.org/g:69e65667549c7e323f02b52d9579ee094d123732

commit 69e65667549c7e323f02b52d9579ee094d123732
Author: Tobias Burnus <tobias@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 1e2ed0be8e8..cb274060614 100644
--- a/gcc/testsuite/ChangeLog.omp
+++ b/gcc/testsuite/ChangeLog.omp
@@ -1,3 +1,8 @@
+2020-08-21  Tobias Burnus  <tobias@codesourcery.com>
+
+	* gfortran.dg/gomp/pr67500.f90: Change dg-warning to
+	dg-error.
+
 2020-08-19   Sandra Loosemore  <sandra@codesourcery.com>
 
 	Annotate inner loops in "acc kernels loop" directives (Fortran).
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