* tree-cfg.c (dump_function_to_file): Be prepared for functions
authorebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4>
Mon, 19 Feb 2007 19:26:16 +0000 (19:26 +0000)
committerebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4>
Mon, 19 Feb 2007 19:26:16 +0000 (19:26 +0000)
without DECL_STRUCT_FUNCTION initialized.

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

gcc/ChangeLog
gcc/tree-cfg.c

index 0f834e4..f521314 100644 (file)
@@ -1,5 +1,10 @@
 2007-02-19  Eric Botcazou  <ebotcazou@adacore.com>
 
+       * tree-cfg.c (dump_function_to_file): Be prepared for functions
+       without DECL_STRUCT_FUNCTION initialized.
+
+2007-02-19  Eric Botcazou  <ebotcazou@adacore.com>
+
        * gimplify.c (gimplify_init_ctor_preeval_1): Detect potential overlap
        due to calls to functions taking pointers as parameters.
 
index a99f3c7..593dc0d 100644 (file)
@@ -4998,6 +4998,7 @@ void
 dump_function_to_file (tree fn, FILE *file, int flags)
 {
   tree arg, vars, var;
+  struct function *dsf;
   bool ignore_topmost_bind = false, any_var = false;
   basic_block bb;
   tree chain;
@@ -5015,8 +5016,10 @@ dump_function_to_file (tree fn, FILE *file, int flags)
     }
   fprintf (file, ")\n");
 
-  if (flags & TDF_DETAILS)
-    dump_eh_tree (file, DECL_STRUCT_FUNCTION (fn));
+  dsf = DECL_STRUCT_FUNCTION (fn);
+  if (dsf && (flags & TDF_DETAILS))
+    dump_eh_tree (file, dsf);
+
   if (flags & TDF_RAW)
     {
       dump_node (fn, TDF_SLIM | flags, file);