Subversion Repositories openrisc

/* { dg-do compile } */
/* { dg-options "-c -O2 -ftree-vectorize" { target *-*-* } } */
 
typedef struct eqn_d
{
  int *coef;
} *eqn;
typedef struct omega_pb_d
{
  eqn subs;
} *omega_pb;
 
omega_pb omega_solve_problem (omega_pb);
 
omega_pb
omega_solve_geq (omega_pb pb, int n)
{
  int i, e;
  int j = 0;
 
  for (e = n - 1; e >= 0; e--)
    if (pb->subs[e].coef[i] != pb->subs[e].coef[j])
      {
	pb->subs[e].coef[i] = j;
	pb->subs[e].coef[j] = i;
      }
 
  return omega_solve_problem (pb);
}