1/* { dg-do compile { target powerpc*-*-* ia64-*-* x86_64-*-* } } */
2/* { dg-options "-O2 -fselective-scheduling -fsel-sched-pipelining -fsched-pressure" } */
3
4struct s_linked_f_pointer
5{
6  struct s_linked_f_pointer *next;
7  float *fptr;
8};
9struct s_trace
10{
11  int index;
12};
13struct s_rr_cost
14{
15  float base_cost;
16  float acc_cost;
17};
18extern int num_nets;
19extern struct s_trace **trace_head;
20extern struct s_rr_cost *rr_cost;
21struct s_rr_route
22{
23  float cost;
24};
25static int heap_tail;
26extern struct s_linked_f_pointer *rr_modified_head;
27extern struct s_rr_route *rr_route;
28
29void
30empty_heap (void)
31{
32  heap_tail = 1;
33}
34
35void
36reset_path_costs (void)
37{
38  struct s_linked_f_pointer *mod_ptr;
39  if (rr_modified_head != ((void *) 0))
40    {
41      mod_ptr = rr_modified_head;
42      while (mod_ptr->next != ((void *) 0))
43	{
44	  *(mod_ptr->fptr) = 1.e30;
45	  mod_ptr = mod_ptr->next;
46	}
47      rr_modified_head = ((void *) 0);
48    }
49}
50
51static void
52route_net (int inet)
53{
54  int i;
55  for (i = 1; i < inet; i++)
56    reset_path_costs ();
57  empty_heap ();
58  reset_path_costs ();
59}
60
61void
62pathfinder_update_one_cost (int inet, float pres_fac, float acc_fac)
63{
64  struct s_trace *tptr;
65  int inode = 0;
66
67  tptr = trace_head[inet];
68  inode = tptr->index;
69  rr_route[inode].cost = rr_cost[inode].base_cost + rr_cost[inode].acc_cost;
70}
71
72int
73try_route (int n, float x, float y)
74{
75  int inet, itry;
76  float pres_fac;
77  for (itry = 1; itry <= n; itry++)
78    {
79      for (inet = 0; inet < num_nets; inet++)
80	{
81	  route_net (inet);
82	  pathfinder_update_one_cost (inet, pres_fac, x);
83	}
84      pres_fac *= y;
85    }
86}
87
88