X-Git-Url: http://git.sourceforge.jp/view?p=pf3gnuchains%2Fgcc-fork.git;a=blobdiff_plain;f=gcc%2Fomp-low.c;h=3e6d91cc5926de0f2f8a3110f441abd41a7ee3b3;hp=3b99f69b62a6c271e51c167e523c1a747adac2cb;hb=8e5b4ed6c154892fb2ef2619fff6b32445ca8ba6;hpb=132cae052ceb4556303898b4bfb854b6a4329e6b

diff --git a/gcc/omp-low.c b/gcc/omp-low.c
index 3b99f69b62a..3e6d91cc592 100644
--- a/gcc/omp-low.c
+++ b/gcc/omp-low.c
@@ -1577,6 +1577,7 @@ create_omp_child_function (omp_context *ctx, bool task_copy)
   t = build_decl (RESULT_DECL, NULL_TREE, void_type_node);
   DECL_ARTIFICIAL (t) = 1;
   DECL_IGNORED_P (t) = 1;
+  DECL_CONTEXT (t) = decl;
   DECL_RESULT (decl) = t;
 
   t = build_decl (PARM_DECL, get_identifier (".omp_data_i"), ptr_type_node);