Subversion Repositories openrisc

/* { dg-do compile } */

/* { dg-options "-O2 -fpic -mtune=generic" } */

/* { dg-require-effective-target fpic } */

static int heap[2*(256 +1+29)+1];

static int heap_len;

static int heap_max;

void

foo (int elems)

{

  int n, m;

  int max_code = -1;

  int node = elems;

  heap_len = 0, heap_max = (2*(256 +1+29)+1);

  for (n = 0; n < elems; n++)

    heap[++heap_len] = max_code = n;

  do {

    n = heap[1];

    heap[1] = heap[heap_len--];

    m = heap[1];

    heap[--heap_max] = n;

    heap[--heap_max] = m;

  } while (heap_len >= 2);

}

/* { dg-final { scan-assembler-not "lea\[lq\]?\[ \t\]\\((%|)r\[a-z0-9\]*" } } */