* gimplify.c (gimplify_body): Watch for body vanishing.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@83598 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 9876fc8..da403d9 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,7 @@
+2004-06-24  Richard Henderson  <rth@redhat.com>
+
+       * gimplify.c (gimplify_body): Watch for body vanishing.
+
 2004-06-24  Jeff Law  <law@redhat.com>
 
        * tree-ssa-dom.c (record_dominating_conditions): New function.

diff --git a/gcc/gimplify.c b/gcc/gimplify.c
index 480b8eb..308f3e9 100644 (file)
--- a/gcc/gimplify.c
+++ b/gcc/gimplify.c
@@ -4142,7 +4142,9 @@ gimplify_body (tree *body_p, tree fndecl)
   /* Unshare again, in case gimplification was sloppy.  */
   unshare_all_trees (body);
 
-  if (TREE_CODE (body) == STATEMENT_LIST)
+  if (!body)
+    body = alloc_stmt_list ();
+  else if (TREE_CODE (body) == STATEMENT_LIST)
     {
       tree t = expr_only (*body_p);
       if (t)