OpenCores
URL https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gcc.dg/] [pr42389.c] - Blame information for rev 301

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 298 jeremybenn
/* { dg-do compile { target powerpc*-*-* ia64-*-* x86_64-*-* } } */
2
/* { dg-options "-O2 -fselective-scheduling -fsel-sched-pipelining -fsched-pressure" } */
3
 
4
struct s_linked_f_pointer
5
{
6
  struct s_linked_f_pointer *next;
7
  float *fptr;
8
};
9
struct s_trace
10
{
11
  int index;
12
};
13
struct s_rr_cost
14
{
15
  float base_cost;
16
  float acc_cost;
17
};
18
extern int num_nets;
19
extern struct s_trace **trace_head;
20
extern struct s_rr_cost *rr_cost;
21
struct s_rr_route
22
{
23
  float cost;
24
};
25
static int heap_tail;
26
extern struct s_linked_f_pointer *rr_modified_head;
27
extern struct s_rr_route *rr_route;
28
 
29
void
30
empty_heap (void)
31
{
32
  heap_tail = 1;
33
}
34
 
35
void
36
reset_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
 
51
static void
52
route_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
 
61
void
62
pathfinder_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
 
72
int
73
try_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
 

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.