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

gcc/ChangeLog

 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.
 

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

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,