re PR middle-end/57467 (FAIL: gfortran.dg/gomp/appendix-a/a.(22.1|22.6|33.1).f90...

	PR middle-end/57467
	* passes.c (for_per_function): Skip unanalyzed functions.

From-SVN: r199582

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index c6a7d7dce6fe81056732485058e4e35a9c1b2995..2960cec864e5683d3222e9d3d3190bdfea83958e 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,8 @@
+2013-06-01  Jan Hubicka  <jh@suse.cz>
+
+       PR middle-end/57467
+       * passes.c (for_per_function): Skip unanalyzed functions.
+
 2013-06-01  Jan Hubicka  <jh@suse.cz>
 
        * lto-symtab.c (lto_symtab_merge_cgraph_nodes_1): Rename to ...

diff --git a/gcc/passes.c b/gcc/passes.c
index 2a29d9f82441f35184a07591bae1262313e3b74b..a4dad2aace46a5e64d1fcee14e4eae4aa6baf0e4 100644 (file)
--- a/gcc/passes.c
+++ b/gcc/passes.c
@@ -1709,7 +1709,7 @@ do_per_function (void (*callback) (void *data), void *data)
     {
       struct cgraph_node *node;
       FOR_EACH_DEFINED_FUNCTION (node)
-       if (gimple_has_body_p (node->symbol.decl)
+       if (node->symbol.analyzed && gimple_has_body_p (node->symbol.decl)
            && (!node->clone_of || node->symbol.decl != node->clone_of->symbol.decl))
          {
            push_cfun (DECL_STRUCT_FUNCTION (node->symbol.decl));