tree-inline.c (estimate_num_insns_1): Make OpenMP directives expensive.

	* tree-inline.c (estimate_num_insns_1): Make OpenMP directives
	expensive.

From-SVN: r110853

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 413d150de61dc304045be9ccd14aa86ef12daea5..8181bb801279d2c7626dc0e8e790321a240a1095 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,8 @@
+2006-02-10  Diego Novillo  <dnovillo@redhat.com>
+
+       * tree-inline.c (estimate_num_insns_1): Make OpenMP directives
+       expensive.
+
 2006-02-10  Zdenek Dvorak <dvorakz@suse.cz>
 
        * doc/invoke.texi (-floop-optimize2): Removed.

diff --git a/gcc/tree-inline.c b/gcc/tree-inline.c
index f9ce09bbe356b5a83c0678e3bf4b0cc66134ccf6..81682c82ec25e729143de2b7de77bec3986287f4 100644 (file)
--- a/gcc/tree-inline.c
+++ b/gcc/tree-inline.c
@@ -1600,15 +1600,6 @@ estimate_num_insns_1 (tree *tp, int *walk_subtrees, void *data)
     case LOOP_EXPR:
     case PHI_NODE:
     case WITH_SIZE_EXPR:
-    case OMP_PARALLEL:
-    case OMP_FOR:
-    case OMP_SECTIONS:
-    case OMP_SINGLE:
-    case OMP_SECTION:
-    case OMP_MASTER:
-    case OMP_ORDERED:
-    case OMP_CRITICAL:
-    case OMP_ATOMIC:
     case OMP_CLAUSE:
     case OMP_RETURN_EXPR:
       break;
@@ -1797,6 +1788,20 @@ estimate_num_insns_1 (tree *tp, int *walk_subtrees, void *data)
        *count += PARAM_VALUE (PARAM_INLINE_CALL_COST);
        break;
       }
+
+    case OMP_PARALLEL:
+    case OMP_FOR:
+    case OMP_SECTIONS:
+    case OMP_SINGLE:
+    case OMP_SECTION:
+    case OMP_MASTER:
+    case OMP_ORDERED:
+    case OMP_CRITICAL:
+    case OMP_ATOMIC:
+      /* OpenMP directives are generally very expensive.  */
+      *count += 40;
+      break;
+
     default:
       gcc_unreachable ();
     }