public inbox for gcc-cvs@sourceware.org
help / color / mirror / Atom feed
From: Tobias Burnus <burnus@gcc.gnu.org>
To: gcc-cvs@gcc.gnu.org
Subject: [gcc/devel/omp/gcc-11] gfortran.dg/gomp/pr99928-5.f90: Use proper iteration var
Date: Fri,  4 Jun 2021 11:44:08 +0000 (GMT)	[thread overview]
Message-ID: <20210604114408.109E2399B408@sourceware.org> (raw)

https://gcc.gnu.org/g:92ffc1f3076c1cd8fbc5ce64bebca558d807ec3e

commit 92ffc1f3076c1cd8fbc5ce64bebca558d807ec3e
Author: Tobias Burnus <tobias@codesourcery.com>
Date:   Fri Jun 4 13:43:21 2021 +0200

    gfortran.dg/gomp/pr99928-5.f90: Use proper iteration var
    
    gcc/testsuite/ChangeLog:
    
            * gfortran.dg/gomp/pr99928-5.f90: Really use the
            proper iteration variable.
    
    (cherry picked from commit ad3f0ad4bafe377072a53ded468fd9948e659f46)

Diff:
---
 gcc/testsuite/ChangeLog.omp                  | 8 ++++++++
 gcc/testsuite/gfortran.dg/gomp/pr99928-5.f90 | 2 +-
 2 files changed, 9 insertions(+), 1 deletion(-)

diff --git a/gcc/testsuite/ChangeLog.omp b/gcc/testsuite/ChangeLog.omp
index 20893144231..3f4c87ccb2f 100644
--- a/gcc/testsuite/ChangeLog.omp
+++ b/gcc/testsuite/ChangeLog.omp
@@ -1,3 +1,11 @@
+2021-06-04  Tobias Burnus  <tobias@codesourcery.com>
+
+	Backported from master:
+	2021-06-04  Tobias Burnus  <tobias@codesourcery.com>
+
+	* gfortran.dg/gomp/pr99928-5.f90: Really use the
+	proper iteration variable.
+
 2021-06-04  Tobias Burnus  <tobias@codesourcery.com>
 
 	Backported from master:
diff --git a/gcc/testsuite/gfortran.dg/gomp/pr99928-5.f90 b/gcc/testsuite/gfortran.dg/gomp/pr99928-5.f90
index c612aaf9556..49cbf1e8cc2 100644
--- a/gcc/testsuite/gfortran.dg/gomp/pr99928-5.f90
+++ b/gcc/testsuite/gfortran.dg/gomp/pr99928-5.f90
@@ -88,7 +88,7 @@ subroutine bar ()
   ! { dg-final { scan-tree-dump "omp taskloop\[^\n\r]*lastprivate\\(j10\\)" "gimple" } }
   ! { dg-final { scan-tree-dump "omp simd\[^\n\r]*linear\\(j10:1\\)" "gimple" } }
   !$omp taskloop simd linear (j10) default(none)
-  do j01 = 1, 64
+  do j10 = 1, 64
   end do
   ! { dg-final { scan-tree-dump "omp teams\[^\n\r]*shared\\(j11\\)" "gimple" } }
   ! { dg-final { scan-tree-dump "omp distribute\[^\n\r]*lastprivate\\(j11\\)" "gimple" } }


                 reply	other threads:[~2021-06-04 11:44 UTC|newest]

Thread overview: [no followups] expand[flat|nested]  mbox.gz  Atom feed

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=20210604114408.109E2399B408@sourceware.org \
    --to=burnus@gcc.gnu.org \
    --cc=gcc-cvs@gcc.gnu.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body. 
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).