From: Jakub Jelinek <jakub@gcc.gnu.org>
Date: Mon, 28 Jan 2019 22:34:32 +0000 (+0100)
Subject: re PR middle-end/89002 (ICE in scan_omp_1_op, at omp-low.c:3166)
X-Git-Tag: upstream/12.2.0~26500
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=52bfbb69e7e888d8692597e649e9cedc7436083c;p=platform%2Fupstream%2Fgcc.git

re PR middle-end/89002 (ICE in scan_omp_1_op, at omp-low.c:3166)

	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.

From-SVN: r268346
---

diff --git a/libgomp/testsuite/libgomp.c/pr89002.c b/libgomp/testsuite/libgomp.c/pr89002.c
index b66fada..6d1b164 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;
-}