]> git.ipfire.org Git - thirdparty/gcc.git/commitdiff
Update dg-* in gfortran.dg/gomp/pr67500.f90
authorTobias Burnus <tobias@codesourcery.com>
Fri, 21 Aug 2020 11:28:06 +0000 (13:28 +0200)
committerKwok Cheung Yeung <kcy@codesourcery.com>
Thu, 22 Apr 2021 17:14:28 +0000 (10:14 -0700)
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.

gcc/testsuite/ChangeLog.omp
gcc/testsuite/gfortran.dg/gomp/pr67500.f90

index 99f9dde7e9a260cb7da9ed250d1d26e6bbcf21e1..d5c60a404fa0ddcd622caaea43f254c676f8f161 100644 (file)
@@ -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).
index 1cecdc485781ac2818961de308570c619063fab5..11ed69f10a7bcfa30ad6a8a2aaf3b9aa3b94920b 100644 (file)
@@ -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