summaryrefslogtreecommitdiffstats
path: root/meta/recipes-devtools/gcc/gcc-4.6.0/gcc-4_6-branch-backports/0244-PR-tree-optimization-48611.patch
diff options
context:
space:
mode:
Diffstat (limited to 'meta/recipes-devtools/gcc/gcc-4.6.0/gcc-4_6-branch-backports/0244-PR-tree-optimization-48611.patch')
-rw-r--r--meta/recipes-devtools/gcc/gcc-4.6.0/gcc-4_6-branch-backports/0244-PR-tree-optimization-48611.patch77
1 files changed, 77 insertions, 0 deletions
diff --git a/meta/recipes-devtools/gcc/gcc-4.6.0/gcc-4_6-branch-backports/0244-PR-tree-optimization-48611.patch b/meta/recipes-devtools/gcc/gcc-4.6.0/gcc-4_6-branch-backports/0244-PR-tree-optimization-48611.patch
new file mode 100644
index 0000000000..1cef11a01a
--- /dev/null
+++ b/meta/recipes-devtools/gcc/gcc-4.6.0/gcc-4_6-branch-backports/0244-PR-tree-optimization-48611.patch
@@ -0,0 +1,77 @@
1From c0d3391a217001c01bae1fa84d8a2e5895398235 Mon Sep 17 00:00:00 2001
2From: jakub <jakub@138bc75d-0d04-0410-961f-82ee72b054a4>
3Date: Tue, 10 May 2011 06:31:59 +0000
4Subject: [PATCH] PR tree-optimization/48611
5 PR tree-optimization/48794
6 * tree-eh.c (remove_unreachable_handlers): Don't remove regions
7 referenced from RESX or EH_DISPATCH arguments.
8
9 * gfortran.dg/gomp/pr48611.f90: New test.
10 * gfortran.dg/gomp/pr48794.f90: New test.
11
12
13git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/branches/gcc-4_6-branch@173608 138bc75d-0d04-0410-961f-82ee72b054a4
14
15index e61d621..99b02c2 100644
16new file mode 100644
17index 0000000..643cc5c
18--- /dev/null
19+++ b/gcc/testsuite/gfortran.dg/gomp/pr48611.f90
20@@ -0,0 +1,12 @@
21+! PR tree-optimization/48611
22+! { dg-do compile }
23+! { dg-options "-Os -fopenmp -fexceptions -fno-tree-ccp -fno-tree-copy-prop" }
24+
25+ integer, allocatable :: a(:)
26+ logical :: l
27+!$omp parallel private (a) reduction (.or.:l)
28+ do i = 1, 7
29+ a(:) = i
30+ end do
31+!$omp end parallel
32+end
33diff --git a/gcc/testsuite/gfortran.dg/gomp/pr48794.f90 b/gcc/testsuite/gfortran.dg/gomp/pr48794.f90
34new file mode 100644
35index 0000000..11edb0b
36--- /dev/null
37+++ b/gcc/testsuite/gfortran.dg/gomp/pr48794.f90
38@@ -0,0 +1,12 @@
39+! PR tree-optimization/48794
40+! { dg-do compile }
41+! { dg-options "-Os -fopenmp -fexceptions -fno-tree-ccp -fno-tree-copy-prop" }
42+
43+ integer, allocatable :: a(:)
44+ logical :: l
45+ if (allocated (a)) call abort
46+!$omp parallel private (a) reduction (.or.:l)
47+ do i = 1, 7
48+ end do
49+!$omp end parallel
50+end
51diff --git a/gcc/tree-eh.c b/gcc/tree-eh.c
52index 0d6158b..19c779c 100644
53--- a/gcc/tree-eh.c
54+++ b/gcc/tree-eh.c
55@@ -3321,6 +3321,19 @@ remove_unreachable_handlers (void)
56 SET_BIT (r_reachable, region->index);
57 SET_BIT (lp_reachable, lp_nr);
58 }
59+
60+ /* Avoid removing regions referenced from RESX/EH_DISPATCH. */
61+ switch (gimple_code (stmt))
62+ {
63+ case GIMPLE_RESX:
64+ SET_BIT (r_reachable, gimple_resx_region (stmt));
65+ break;
66+ case GIMPLE_EH_DISPATCH:
67+ SET_BIT (r_reachable, gimple_eh_dispatch_region (stmt));
68+ break;
69+ default:
70+ break;
71+ }
72 }
73 }
74
75--
761.7.0.4
77