]> git.ipfire.org Git - thirdparty/gcc.git/commitdiff
Reduce testsuite fails
authorTobias Burnus <tobias@codesourcery.com>
Thu, 19 Sep 2019 13:57:08 +0000 (15:57 +0200)
committerKwok Cheung Yeung <kcy@codesourcery.com>
Thu, 22 Apr 2021 17:14:20 +0000 (10:14 -0700)
gcc/testsuite/
2019-09-19  Tobias Burnus  <tobias@codesourcery.com>

        * gfortran.dg/goacc/classify-kernels-unparallelized.f95: Add
        one dg-message for additional -fopt-info-optimized-omp output.
        * gfortran.dg/goacc/classify-kernels.f95: Likewise.

gcc/testsuite/ChangeLog.omp
gcc/testsuite/gfortran.dg/goacc/classify-kernels-unparallelized.f95
gcc/testsuite/gfortran.dg/goacc/classify-kernels.f95

index 0616ac6c5c212f37e354b4ed5997d3bd560291e2..b673fb84422e7e644c625ee454cb504f173bda3b 100644 (file)
@@ -1,3 +1,9 @@
+2019-09-19  Tobias Burnus  <tobias@codesourcery.com>
+
+       * gfortran.dg/goacc/classify-kernels-unparallelized.f95: Add
+       one dg-message for additional -fopt-info-optimized-omp output.
+       * gfortran.dg/goacc/classify-kernels.f95: Likewise.
+
 2019-09-17  Julian Brown  <julian@codesourcery.com>
 
        * c-c++-common/goacc/classify-kernels-unparallelized.c: Update expected
index aa62c63f57b034bc4a9c7c78f2da4aa62b03b5be..6411f481064020462575c8af0f5bef29d4146bad 100644 (file)
@@ -19,8 +19,9 @@ program main
 
   call setup(a, b)
 
-  !$acc kernels copyin (a(0:n-1), b(0:n-1)) copyout (c(0:n-1)) ! { dg-message "optimized: assigned OpenACC seq loop parallelism" }
-  do i = 0, n - 1
+  !$acc kernels copyin (a(0:n-1), b(0:n-1)) copyout (c(0:n-1))
+  do i = 0, n - 1 ! { dg-message "optimized: assigned OpenACC seq loop parallelism" }
+                  ! { dg-message "optimized: beginning .parloops. region in OpenACC .kernels. construct" "" { target *-*-* } 23 }
      c(i) = a(f (i)) + b(f (i))
   end do
   !$acc end kernels
index 0bc5fb5cf30fee2be8c551d872d0a86258fb8e33..8ee3e3d54aa50d98b602a01ff4736eff9cc564e6 100644 (file)
@@ -15,8 +15,9 @@ program main
 
   call setup(a, b)
 
-  !$acc kernels copyin (a(0:n-1), b(0:n-1)) copyout (c(0:n-1)) ! { dg-message "optimized: assigned OpenACC gang loop parallelism" }
-  do i = 0, n - 1
+  !$acc kernels copyin (a(0:n-1), b(0:n-1)) copyout (c(0:n-1))
+  do i = 0, n - 1 ! { dg-message "optimized: assigned OpenACC gang loop parallelism" }
+                  ! { dg-message "optimized: beginning .parloops. region in OpenACC .kernels. construct" "" { target *-*-* } 19 }
      c(i) = a(i) + b(i)
   end do
   !$acc end kernels