From: Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
Date: Fri, 25 Jun 2004 01:33:42 +0000 (+0000)
Subject: gimplify.c (append_to_compound_expr): Deleted.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=f0d59f2e4329ac3ddf2e5c1af8025c88325053b4;p=gcc.git

gimplify.c (append_to_compound_expr): Deleted.

	* gimplify.c (append_to_compound_expr): Deleted.
	* tree-gimple.h (append_to_compound_expr): Deleted.

From-SVN: r83629
---

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index e4f9cb1dc00..7e545ce7d9b 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,5 +1,8 @@
 2004-06-24  Richard Kenner  <kenner@vlsi1.ultra.nyu.edu>
 
+	* gimplify.c (append_to_compound_expr): Deleted.
+	* tree-gimple.h (append_to_compound_expr): Deleted.
+
 	* fold-const.c (fold_addr_expr_with_type): Look through all
 	valid LHS modifiers to find a base to mark addressable.
 
diff --git a/gcc/gimplify.c b/gcc/gimplify.c
index a050b2080c3..fc7cc9d0898 100644
--- a/gcc/gimplify.c
+++ b/gcc/gimplify.c
@@ -314,20 +314,6 @@ gimplify_and_add (tree t, tree *list_p)
   append_to_statement_list (t, list_p);
 }
 
-/* Add T to the end of a COMPOUND_EXPR pointed by LIST_P.  The type
-   of the result is the type of T.  */
-
-void
-append_to_compound_expr (tree t, tree *list_p)
-{
-  if (!t)
-    return;
-  if (!*list_p)
-    *list_p = t;
-  else
-    *list_p = build (COMPOUND_EXPR, TREE_TYPE (t), *list_p, t);
-}
-
 /* Strip off a legitimate source ending from the input string NAME of
    length LEN.  Rather than having to know the names used by all of
    our front ends, we strip off an ending of a period followed by
diff --git a/gcc/tree-gimple.h b/gcc/tree-gimple.h
index 9b86e982f08..3be53891346 100644
--- a/gcc/tree-gimple.h
+++ b/gcc/tree-gimple.h
@@ -82,8 +82,6 @@ extern tree get_call_expr_in (tree t);
 
 extern void recalculate_side_effects (tree);
 
-extern void append_to_compound_expr (tree, tree *);
-
 /* FIXME we should deduce this from the predicate.  */
 typedef enum fallback_t {
   fb_none = 0,