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 e4f9cb1dc00334b097ff0182d1fcd9b5d5c41242..7e545ce7d9bbd3a0a11b2de161469462e316ac51 100644 (file)
--- 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 a050b2080c342c27df2a384c86de5a540c2adb13..fc7cc9d08982874c1d6b776f3c893d89347e0a6d 100644 (file)
--- 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 9b86e982f08fb3436f20fde086a158f33cd5740c..3be53891346d626ea1d1d9fa97856318e31f785c 100644 (file)
--- 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,