ipa-cp.c (estimate_local_effects): Convert sreal to int.
authorJan Hubicka <hubicka@ucw.cz>
Wed, 26 Apr 2017 10:31:08 +0000 (12:31 +0200)
committerJan Hubicka <hubicka@gcc.gnu.org>
Wed, 26 Apr 2017 10:31:08 +0000 (10:31 +0000)
* ipa-cp.c (estimate_local_effects): Convert sreal to int.
* ipa-inline-analysis.c (MAX_TIME): Remove.
(account_size_time): Use sreal for time.
(dump_inline_summary): Update.
(estimate_function_body_sizes): Update.
(estimate_edge_size_and_time): Update.
(estimate_calls_size_and_time): Update.
(estimate_node_size_and_time): Update.
(inline_merge_summary): Update.
(inline_update_overall_summary): Update.
(estimate_time_after_inlining): Update.
(inline_read_section): Update.
(inline_write_summary): Update.
* ipa-inline.c (compute_uninlined_call_time): Update.
(compute_inlined_call_time): Update.
(recursive_inlining): Update.
(inline_small_functions): Update.
(dump_overall_stats): Update.
* ipa-inline.h: Include sreal.h.
(size_time_entry): Turn time to sreal.
(inline_summary): Turn self_time nad time to sreal.

From-SVN: r247277

gcc/ChangeLog
gcc/ipa-cp.c
gcc/ipa-inline-analysis.c
gcc/ipa-inline.c
gcc/ipa-inline.h

index 41df066dae784fce6333fef1478baa7c3741f2fa..4d20754226319ad3b938515c586deece60a7c180 100644 (file)
@@ -1,3 +1,27 @@
+2017-04-25  Jan Hubicka  <hubicka@ucw.cz>
+
+       * ipa-cp.c (estimate_local_effects): Convert sreal to int.
+       * ipa-inline-analysis.c (MAX_TIME): Remove.
+       (account_size_time): Use sreal for time.
+       (dump_inline_summary): Update.
+       (estimate_function_body_sizes): Update.
+       (estimate_edge_size_and_time): Update.
+       (estimate_calls_size_and_time): Update.
+       (estimate_node_size_and_time): Update.
+       (inline_merge_summary): Update.
+       (inline_update_overall_summary): Update.
+       (estimate_time_after_inlining): Update.
+       (inline_read_section): Update.
+       (inline_write_summary): Update.
+       * ipa-inline.c (compute_uninlined_call_time): Update.
+       (compute_inlined_call_time): Update.
+       (recursive_inlining): Update.
+       (inline_small_functions): Update.
+       (dump_overall_stats): Update.
+       * ipa-inline.h: Include sreal.h.
+       (size_time_entry): Turn time to sreal.
+       (inline_summary): Turn self_time nad time to sreal.
+
 2017-04-25  Jan Hubicka  <hubicka@ucw.cz>
 
        * sreal.c: Include backend.h, tree.h, gimple.h, cgraph.h and
index fa3d5fd7548496c525a0241e9a8af2c1bc43ef43..d31e2c30a4687c1ec54bc366a52a0c89225b6cbf 100644 (file)
@@ -2832,7 +2832,7 @@ estimate_local_effects (struct cgraph_node *node)
   vec<ipa_agg_jump_function> known_aggs;
   vec<ipa_agg_jump_function_p> known_aggs_ptrs;
   bool always_const;
-  int base_time = inline_summaries->get (node)->time;
+  int base_time = inline_summaries->get (node)->time.to_int ();
   int removable_params_cost;
 
   if (!count || !ipcp_versionable_function_p (node))
index 97338e19f3a681412205fc4ce32f111eeb211d11..2cf594429bb62d62dcbec40c7e5240347938a510 100644 (file)
@@ -96,11 +96,6 @@ along with GCC; see the file COPYING3.  If not see
 #include "cfgexpand.h"
 #include "gimplify.h"
 
-/* Estimate runtime of function can easilly run into huge numbers with many
-   nested loops.  Be sure we can compute time * INLINE_SIZE_SCALE * 2 in an
-   integer.  For anything larger we use gcov_type.  */
-#define MAX_TIME 500000
-
 /* Number of bits in integer, but we really want to be stable across different
    hosts.  */
 #define NUM_CONDITIONS 32
@@ -668,7 +663,7 @@ dump_inline_hints (FILE *f, inline_hints hints)
 /* Record SIZE and TIME under condition PRED into the inline summary.  */
 
 static void
-account_size_time (struct inline_summary *summary, int size, int time,
+account_size_time (struct inline_summary *summary, int size, sreal time,
                   struct predicate *pred)
 {
   size_time_entry *e;
@@ -680,12 +675,9 @@ account_size_time (struct inline_summary *summary, int size, int time,
 
   /* We need to create initial empty unconitional clause, but otherwie
      we don't need to account empty times and sizes.  */
-  if (!size && !time && summary->entry)
+  if (!size && time == 0 && summary->entry)
     return;
 
-  /* Watch overflow that might result from insane profiles.  */
-  if (time > MAX_TIME * INLINE_TIME_SCALE)
-    time = MAX_TIME * INLINE_TIME_SCALE;
   gcc_assert (time >= 0);
 
   for (i = 0; vec_safe_iterate (summary->entry, i, &e); i++)
@@ -705,12 +697,12 @@ account_size_time (struct inline_summary *summary, int size, int time,
                 "\t\tReached limit on number of entries, "
                 "ignoring the predicate.");
     }
-  if (dump_file && (dump_flags & TDF_DETAILS) && (time || size))
+  if (dump_file && (dump_flags & TDF_DETAILS) && (time != 0 || size))
     {
       fprintf (dump_file,
               "\t\tAccounting size:%3.2f, time:%3.2f on %spredicate:",
               ((double) size) / INLINE_SIZE_SCALE,
-              ((double) time) / INLINE_TIME_SCALE, found ? "" : "new ");
+              (time.to_double ()) / INLINE_TIME_SCALE, found ? "" : "new ");
       dump_predicate (dump_file, summary->conds, pred);
     }
   if (!found)
@@ -725,8 +717,6 @@ account_size_time (struct inline_summary *summary, int size, int time,
     {
       e->size += size;
       e->time += time;
-      if (e->time > MAX_TIME * INLINE_TIME_SCALE)
-       e->time = MAX_TIME * INLINE_TIME_SCALE;
     }
 }
 
@@ -1048,7 +1038,8 @@ reset_inline_summary (struct cgraph_node *node,
 {
   struct cgraph_edge *e;
 
-  info->self_size = info->self_time = 0;
+  info->self_size = 0;
+  info->self_time = 0;
   info->estimated_stack_size = 0;
   info->estimated_self_stack_size = 0;
   info->stack_frame_offset = 0;
@@ -1434,8 +1425,8 @@ dump_inline_summary (FILE *f, struct cgraph_node *node)
        fprintf (f, " contains_cilk_spawn");
       if (s->fp_expressions)
        fprintf (f, " fp_expression");
-      fprintf (f, "\n  self time:       %i\n", s->self_time);
-      fprintf (f, "  global time:     %i\n", s->time);
+      fprintf (f, "\n  self time:       %f\n", s->self_time.to_double ());
+      fprintf (f, "  global time:     %f\n", s->time.to_double ());
       fprintf (f, "  self size:       %i\n", s->self_size);
       fprintf (f, "  global size:     %i\n", s->size);
       fprintf (f, "  min size:       %i\n", s->min_size);
@@ -1450,7 +1441,7 @@ dump_inline_summary (FILE *f, struct cgraph_node *node)
        {
          fprintf (f, "    size:%f, time:%f, predicate:",
                   (double) e->size / INLINE_SIZE_SCALE,
-                  (double) e->time / INLINE_TIME_SCALE);
+                  e->time.to_double () / INLINE_TIME_SCALE);
          dump_predicate (f, s->conds, &e->predicate);
        }
       if (s->loop_iterations)
@@ -2534,7 +2525,7 @@ fp_expression_p (gimple *stmt)
 static void
 estimate_function_body_sizes (struct cgraph_node *node, bool early)
 {
-  gcov_type time = 0;
+  sreal time = 0;
   /* Estimate static overhead for function prologue/epilogue and alignment. */
   int size = 2;
   /* Benefits are scaled by probability of elimination that is in range
@@ -2780,8 +2771,6 @@ estimate_function_body_sizes (struct cgraph_node *node, bool early)
                {
                  time += this_time;
                  size += this_size;
-                 if (time > MAX_TIME * INLINE_TIME_SCALE)
-                   time = MAX_TIME * INLINE_TIME_SCALE;
                }
 
              /* We account everything but the calls.  Calls have their own
@@ -2814,9 +2803,7 @@ estimate_function_body_sizes (struct cgraph_node *node, bool early)
        }
     }
   set_hint_predicate (&inline_summaries->get (node)->array_index, array_index);
-  time = (time + CGRAPH_FREQ_BASE / 2) / CGRAPH_FREQ_BASE;
-  if (time > MAX_TIME)
-    time = MAX_TIME;
+  time = time / CGRAPH_FREQ_BASE;
   free (order);
 
   if (nonconstant_names.exists () && !early)
@@ -3167,7 +3154,7 @@ estimate_edge_devirt_benefit (struct cgraph_edge *ie,
 
 static inline void
 estimate_edge_size_and_time (struct cgraph_edge *e, int *size, int *min_size,
-                            int *time,
+                            sreal *time,
                             int prob,
                             vec<tree> known_vals,
                             vec<ipa_polymorphic_call_context> known_contexts,
@@ -3187,10 +3174,8 @@ estimate_edge_size_and_time (struct cgraph_edge *e, int *size, int *min_size,
   *size += cur_size;
   if (min_size)
     *min_size += cur_size;
-  *time += apply_probability ((gcov_type) call_time, prob)
+  *time += call_time * prob / REG_BR_PROB_BASE
     * e->frequency * (INLINE_TIME_SCALE / CGRAPH_FREQ_BASE);
-  if (*time > MAX_TIME * INLINE_TIME_SCALE)
-    *time = MAX_TIME * INLINE_TIME_SCALE;
 }
 
 
@@ -3201,7 +3186,7 @@ estimate_edge_size_and_time (struct cgraph_edge *e, int *size, int *min_size,
 
 static void
 estimate_calls_size_and_time (struct cgraph_node *node, int *size,
-                             int *min_size, int *time,
+                             int *min_size, sreal *time,
                              inline_hints *hints,
                              clause_t possible_truths,
                              vec<tree> known_vals,
@@ -3283,7 +3268,7 @@ estimate_node_size_and_time (struct cgraph_node *node,
   struct inline_summary *info = inline_summaries->get (node);
   size_time_entry *e;
   int size = 0;
-  int time = 0;
+  sreal time = 0;
   int min_size = 0;
   inline_hints hints = 0;
   int i;
@@ -3323,10 +3308,8 @@ estimate_node_size_and_time (struct cgraph_node *node,
                                              inline_param_summary);
            gcc_checking_assert (prob >= 0);
            gcc_checking_assert (prob <= REG_BR_PROB_BASE);
-           time += apply_probability ((gcov_type) e->time, prob);
+           time += e->time * prob / REG_BR_PROB_BASE;
          }
-       if (time > MAX_TIME * INLINE_TIME_SCALE)
-         time = MAX_TIME * INLINE_TIME_SCALE;
        gcc_checking_assert (time >= 0);
 
       }
@@ -3358,9 +3341,9 @@ estimate_node_size_and_time (struct cgraph_node *node,
   min_size = RDIV (min_size, INLINE_SIZE_SCALE);
 
   if (dump_file && (dump_flags & TDF_DETAILS))
-    fprintf (dump_file, "\n   size:%i time:%i\n", (int) size, (int) time);
+    fprintf (dump_file, "\n   size:%i time:%f\n", (int) size, time.to_double ());
   if (ret_time)
-    *ret_time = time;
+    *ret_time = time.to_int ();
   if (ret_size)
     *ret_size = size;
   if (ret_min_size)
@@ -3727,14 +3710,11 @@ inline_merge_summary (struct cgraph_edge *edge)
                                            &toplev_predicate);
       if (!false_predicate_p (&p))
        {
-         gcov_type add_time = ((gcov_type) e->time * edge->frequency
-                               + CGRAPH_FREQ_BASE / 2) / CGRAPH_FREQ_BASE;
+         sreal add_time = e->time * edge->frequency / CGRAPH_FREQ_BASE;
          int prob = predicate_probability (callee_info->conds,
                                            &e->predicate,
                                            clause, es->param);
-         add_time = apply_probability ((gcov_type) add_time, prob);
-         if (add_time > MAX_TIME * INLINE_TIME_SCALE)
-           add_time = MAX_TIME * INLINE_TIME_SCALE;
+         add_time = add_time * prob / REG_BR_PROB_BASE;
          if (prob != REG_BR_PROB_BASE
              && dump_file && (dump_flags & TDF_DETAILS))
            {
@@ -3782,14 +3762,12 @@ inline_update_overall_summary (struct cgraph_node *node)
   for (i = 0; vec_safe_iterate (info->entry, i, &e); i++)
     {
       info->size += e->size, info->time += e->time;
-      if (info->time > MAX_TIME * INLINE_TIME_SCALE)
-       info->time = MAX_TIME * INLINE_TIME_SCALE;
     }
   estimate_calls_size_and_time (node, &info->size, &info->min_size,
                                &info->time, NULL,
                                ~(clause_t) (1 << predicate_false_condition),
                                vNULL, vNULL, vNULL);
-  info->time = (info->time + INLINE_TIME_SCALE / 2) / INLINE_TIME_SCALE;
+  info->time = info->time / INLINE_TIME_SCALE;
   info->size = (info->size + INLINE_SIZE_SCALE / 2) / INLINE_SIZE_SCALE;
 }
 
@@ -3965,15 +3943,13 @@ estimate_time_after_inlining (struct cgraph_node *node,
   struct inline_edge_summary *es = inline_edge_summary (edge);
   if (!es->predicate || !false_predicate_p (es->predicate))
     {
-      gcov_type time =
+      sreal time =
        inline_summaries->get (node)->time + estimate_edge_time (edge);
       if (time < 0)
        time = 0;
-      if (time > MAX_TIME)
-       time = MAX_TIME;
-      return time;
+      return time.to_int ();
     }
-  return inline_summaries->get (node)->time;
+  return inline_summaries->get (node)->time.to_int ();
 }
 
 
@@ -4317,7 +4293,7 @@ inline_read_section (struct lto_file_decl_data *file_data, const char *data,
       info->estimated_stack_size
        = info->estimated_self_stack_size = streamer_read_uhwi (&ib);
       info->size = info->self_size = streamer_read_uhwi (&ib);
-      info->time = info->self_time = streamer_read_uhwi (&ib);
+      info->time = info->self_time = sreal::stream_in (&ib);
 
       bp = streamer_read_bitpack (&ib);
       info->inlinable = bp_unpack_value (&bp, 1);
@@ -4347,7 +4323,7 @@ inline_read_section (struct lto_file_decl_data *file_data, const char *data,
          struct size_time_entry e;
 
          e.size = streamer_read_uhwi (&ib);
-         e.time = streamer_read_uhwi (&ib);
+         e.time = sreal::stream_in (&ib);
          e.predicate = read_predicate (&ib);
 
          vec_safe_push (info->entry, e);
@@ -4482,7 +4458,7 @@ inline_write_summary (void)
          streamer_write_uhwi (ob, lto_symtab_encoder_encode (encoder, cnode));
          streamer_write_hwi (ob, info->estimated_self_stack_size);
          streamer_write_hwi (ob, info->self_size);
-         streamer_write_hwi (ob, info->self_time);
+         info->self_time.stream_out (ob);
          bp = bitpack_create (ob->main_stream);
          bp_pack_value (&bp, info->inlinable, 1);
          bp_pack_value (&bp, info->contains_cilk_spawn, 1);
@@ -4506,7 +4482,7 @@ inline_write_summary (void)
          for (i = 0; vec_safe_iterate (info->entry, i, &e); i++)
            {
              streamer_write_uhwi (ob, e->size);
-             streamer_write_uhwi (ob, e->time);
+             e->time.stream_out (ob);
              write_predicate (ob, &e->predicate);
            }
          write_predicate (ob, info->loop_iterations);
index 4843f8a2f8ef450827d823e036f1d715e67ffd93..f50d29b6a5dac61ae24b4cac58135a8e047e87b4 100644 (file)
@@ -654,7 +654,7 @@ compute_uninlined_call_time (struct inline_summary *callee_info,
   else
     uninlined_call_time = uninlined_call_time >> 11;
 
-  int caller_time = inline_summaries->get (caller)->time;
+  sreal caller_time = inline_summaries->get (caller)->time;
   return uninlined_call_time + caller_time;
 }
 
@@ -668,7 +668,7 @@ compute_inlined_call_time (struct cgraph_edge *edge,
   cgraph_node *caller = (edge->caller->global.inlined_to 
                         ? edge->caller->global.inlined_to
                         : edge->caller);
-  int caller_time = inline_summaries->get (caller)->time;
+  sreal caller_time = inline_summaries->get (caller)->time;
   sreal time = edge_time;
 
   if (edge->count && caller->count)
@@ -753,6 +753,14 @@ want_inline_small_function_p (struct cgraph_edge *e, bool report)
       int growth = estimate_edge_growth (e);
       inline_hints hints = estimate_edge_hints (e);
       bool big_speedup = big_speedup_p (e);
+/*
+       fprintf (stderr, "%i %i %i\n",growth,hints,big_speedup);
+       dump_inline_summary (stderr, e->caller->global.inlined_to ? e->caller->global.inlined_to : e->caller);
+       dump_inline_summary (stderr, e->callee);
+  sreal time = compute_uninlined_call_time (inline_summaries->get (e->callee),
+                                           e);
+  sreal inlined_time = compute_inlined_call_time (e, estimate_edge_time (e));
+ fprintf (stderr, "%f %f\n", time.to_double (), inlined_time.to_double ());*/
 
       if (growth <= 0)
        ;
@@ -1023,7 +1031,9 @@ edge_badness (struct cgraph_edge *edge, bool dump)
   edge_time = estimate_edge_time (edge);
   hints = estimate_edge_hints (edge);
   gcc_checking_assert (edge_time >= 0);
-  gcc_checking_assert (edge_time <= callee_info->time);
+  /* FIXME: -1 to care of rounding issues should go away once cache is migrated.
+     to sreals.  */
+  gcc_checking_assert (edge_time - 1 <= callee_info->time);
   gcc_checking_assert (growth <= callee_info->size);
 
   if (dump)
@@ -1554,9 +1564,11 @@ recursive_inlining (struct cgraph_edge *edge,
   if (dump_file)
     fprintf (dump_file,
             "\n   Inlined %i times, "
-            "body grown from size %i to %i, time %i to %i\n", n,
-            inline_summaries->get (master_clone)->size, inline_summaries->get (node)->size,
-            inline_summaries->get (master_clone)->time, inline_summaries->get (node)->time);
+            "body grown from size %i to %i, time %f to %f\n", n,
+            inline_summaries->get (master_clone)->size,
+            inline_summaries->get (node)->size,
+            inline_summaries->get (master_clone)->time.to_double (),
+            inline_summaries->get (node)->time.to_double ());
 
   /* Remove master clone we used for inlining.  We rely that clones inlined
      into master clone gets queued just before master clone so we don't
@@ -2052,10 +2064,10 @@ inline_small_functions (void)
       if (dump_file)
        {
          fprintf (dump_file,
-                  " Inlined into %s which now has time %i and size %i, "
+                  " Inlined into %s which now has time %f and size %i, "
                   "net change of %+i.\n",
                   edge->caller->name (),
-                  inline_summaries->get (edge->caller)->time,
+                  inline_summaries->get (edge->caller)->time.to_double (),
                   inline_summaries->get (edge->caller)->size,
                   overall_size - old_size);
        }
@@ -2245,7 +2257,7 @@ dump_overall_stats (void)
     if (!node->global.inlined_to
        && !node->alias)
       {
-       int time = inline_summaries->get (node)->time;
+       int time = inline_summaries->get (node)->time.to_double ();
        sum += time;
        sum_weighted += time * node->count;
       }
index 0010530ab2ee30cb1d914624c70103aff3253266..077f0cc936baf65bc7f3db41f00dc45ce563b514 100644 (file)
@@ -21,6 +21,8 @@ along with GCC; see the file COPYING3.  If not see
 #ifndef GCC_IPA_INLINE_H
 #define GCC_IPA_INLINE_H
 
+#include "sreal.h"
+
 
 /* Representation of inline parameters that do depend on context function is
    inlined into (i.e. known constant values of function parameters.
@@ -109,7 +111,7 @@ struct GTY(()) size_time_entry
 {
   struct predicate predicate;
   int size;
-  int time;
+  sreal GTY((skip)) time;
 };
 
 /* Function inlining information.  */
@@ -122,7 +124,7 @@ struct GTY(()) inline_summary
   /* Size of the function body.  */
   int self_size;
   /* Time of the function body.  */
-  int self_time;
+  sreal GTY((skip)) self_time;
   /* Minimal size increase after inlining.  */
   int min_size;
 
@@ -146,7 +148,7 @@ struct GTY(()) inline_summary
   /* Expected offset of the stack frame of inlined function.  */
   HOST_WIDE_INT stack_frame_offset;
   /* Estimated size of the function after inlining.  */
-  int time;
+  sreal GTY((skip)) time;
   int size;
 
   /* Conditional size/time information.  The summaries are being