tree.c (decl_value_expr_lookup): Revert latest change.

	* tree.c (decl_value_expr_lookup): Revert latest change.
	(decl_value_expr_insert): Likewise.
fortran/
	* trans-decl.c (gfc_get_fake_result_decl): Revert latest change.

From-SVN: r261696

1 files changed, 1 insertions, 15 deletions

diff --git a/gcc/tree.c b/gcc/tree.c
index 8082932..2d3b26e 100644
--- a/gcc/tree.c
+++ b/gcc/tree.c
@@ -6337,15 +6337,7 @@ decl_value_expr_lookup (tree from)
 
   h = value_expr_for_decl->find_with_hash (&in, DECL_UID (from));
   if (h)
-    {
-      /* Chains of value expressions may run afoul of garbage collection.  */
-      gcc_checking_assert (!(h->to
-			     && (TREE_CODE (h->to) == PARM_DECL
-				 || TREE_CODE (h->to) == VAR_DECL)
-			     && DECL_HAS_VALUE_EXPR_P (h->to)));
-      return h->to;
-    }
-
+    return h->to;
   return NULL_TREE;
 }
 
@@ -6356,12 +6348,6 @@ decl_value_expr_insert (tree from, tree to)
 {
   struct tree_decl_map *h;
 
-  /* Chains of value expressions may run afoul of garbage collection.  */
-  gcc_checking_assert (!(to
-			 && (TREE_CODE (to) == PARM_DECL
-			     || TREE_CODE (to) == VAR_DECL)
-			 && DECL_HAS_VALUE_EXPR_P (to)));
-
   h = ggc_alloc<tree_decl_map> ();
   h->base.from = from;
   h->to = to;