diff options
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.patch | 77 |
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 @@ | |||
1 | From c0d3391a217001c01bae1fa84d8a2e5895398235 Mon Sep 17 00:00:00 2001 | ||
2 | From: jakub <jakub@138bc75d-0d04-0410-961f-82ee72b054a4> | ||
3 | Date: Tue, 10 May 2011 06:31:59 +0000 | ||
4 | Subject: [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 | |||
13 | git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/branches/gcc-4_6-branch@173608 138bc75d-0d04-0410-961f-82ee72b054a4 | ||
14 | |||
15 | index e61d621..99b02c2 100644 | ||
16 | new file mode 100644 | ||
17 | index 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 | ||
33 | diff --git a/gcc/testsuite/gfortran.dg/gomp/pr48794.f90 b/gcc/testsuite/gfortran.dg/gomp/pr48794.f90 | ||
34 | new file mode 100644 | ||
35 | index 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 | ||
51 | diff --git a/gcc/tree-eh.c b/gcc/tree-eh.c | ||
52 | index 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 | -- | ||
76 | 1.7.0.4 | ||
77 | |||