From: Eric Botcazou <ebotcazou@adacore.com>
Date: Thu, 21 Jun 2018 17:01:12 +0000 (+0000)
Subject: tree-nested.c (get_frame_type): Use create_tmp_var_raw instead of create_tmp_var_for... 
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=575b192558435f0128e6f71afb95d002cdef835e;p=gcc.git

tree-nested.c (get_frame_type): Use create_tmp_var_raw instead of create_tmp_var_for to create the FRAME decl.

	* tree-nested.c (get_frame_type): Use create_tmp_var_raw instead of
	create_tmp_var_for to create the FRAME decl.
	(finalize_nesting_tree_1): Do not unchain the FRAME decl.

From-SVN: r261854
---

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index b76ae5a7902..0550afb5942 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,9 @@
+2018-06-21  Eric Botcazou  <ebotcazou@adacore.com>
+
+	* tree-nested.c (get_frame_type): Use create_tmp_var_raw instead of
+	create_tmp_var_for to create the FRAME decl.
+	(finalize_nesting_tree_1): Do not unchain the FRAME decl.
+
 2018-06-21  Eric Botcazou  <ebotcazou@adacore.com>
 
 	* tree-inline.c (copy_edges_for_bb): Minor tweak.
diff --git a/gcc/tree-nested.c b/gcc/tree-nested.c
index 257ceae6f2d..127a81f9973 100644
--- a/gcc/tree-nested.c
+++ b/gcc/tree-nested.c
@@ -223,8 +223,15 @@ get_frame_type (struct nesting_info *info)
       free (name);
 
       info->frame_type = type;
-      info->frame_decl = create_tmp_var_for (info, type, "FRAME");
+
+      /* Do not put info->frame_decl on info->new_local_var_chain,
+	 so that we can declare it in the lexical blocks, which
+	 makes sure virtual regs that end up appearing in its RTL
+	 expression get substituted in instantiate_virtual_regs.  */
+      info->frame_decl = create_tmp_var_raw (type, "FRAME");
+      DECL_CONTEXT (info->frame_decl) = info->context;
       DECL_NONLOCAL_FRAME (info->frame_decl) = 1;
+      DECL_SEEN_IN_BIND_EXPR_P (info->frame_decl) = 1;
 
       /* ??? Always make it addressable for now, since it is meant to
 	 be pointed to by the static chain pointer.  This pessimizes
@@ -234,6 +241,7 @@ get_frame_type (struct nesting_info *info)
 	 local frame structure in the first place.  */
       TREE_ADDRESSABLE (info->frame_decl) = 1;
     }
+
   return type;
 }
 
@@ -3117,18 +3125,6 @@ finalize_nesting_tree_1 (struct nesting_info *root)
       gimple_seq_add_stmt (&stmt_list,
 			   gimple_build_assign (fb_ref, fb_tmp));
 
-      /* Remove root->frame_decl from root->new_local_var_chain, so
-	 that we can declare it also in the lexical blocks, which
-	 helps ensure virtual regs that end up appearing in its RTL
-	 expression get substituted in instantiate_virtual_regs().  */
-      tree *adjust;
-      for (adjust = &root->new_local_var_chain;
-	   *adjust != root->frame_decl;
-	   adjust = &DECL_CHAIN (*adjust))
-	gcc_assert (DECL_CHAIN (*adjust));
-      *adjust = DECL_CHAIN (*adjust);
-
-      DECL_CHAIN (root->frame_decl) = NULL_TREE;
       declare_vars (root->frame_decl,
 		    gimple_seq_first_stmt (gimple_body (context)), true);
     }