From: jakub <jakub@138bc75d-0d04-0410-961f-82ee72b054a4>
Date: Mon, 28 Jan 2019 22:34:32 +0000 (+0000)
Subject: 	PR middle-end/89002
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=7c91c517c993701bf8871d204b95869310ebbeb0;p=thirdparty%2Fgcc.git

	PR middle-end/89002
	* gimplify.c (gimplify_omp_for): When adding OMP_CLAUSE_*_GIMPLE_SEQ
	for lastprivate/linear IV, push gimplify context around gimplify_assign
	and, if it needed any temporaries, pop it into a gimple bind around the
	sequence.

	* testsuite/libgomp.c/pr89002.c: New test.


git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@268346 138bc75d-0d04-0410-961f-82ee72b054a4
---

diff --git a/libgomp/testsuite/libgomp.c/pr89002.c b/libgomp/testsuite/libgomp.c/pr89002.c
index b66fada836fa..6d1b16405f22 100644
--- a/libgomp/testsuite/libgomp.c/pr89002.c
+++ b/libgomp/testsuite/libgomp.c/pr89002.c
@@ -41,46 +41,3 @@ main ()
     abort ();
   return 0;
 }
-/* PR middle-end/89002 */
-
-extern void abort (void);
-
-int
-foo (int x)
-{
-  int a;
-  int *p = &a;
-
-#pragma omp taskloop lastprivate (a)
-  for (a = 0; a < x; ++a)
-    ;
-  return *p;
-}
-
-int
-bar (int x)
-{
-  int a;
-  int *p = &a;
-
-#pragma omp parallel
-#pragma omp single
-#pragma omp taskloop lastprivate (a)
-  for (a = 0; a < x; ++a)
-    ;
-  return *p;
-}
-
-int
-main ()
-{
-#pragma omp parallel
-#pragma omp single
-  {
-    if (foo (4) != 4)
-      abort ();
-  }
-  if (bar (6) != 6)
-    abort ();
-  return 0;
-}