summaryrefslogtreecommitdiff
path: root/support/regression/tests/gcc-torture-execute-loop-5.c
blob: bada8cdebd14bebf7a9506a063aa78050ba3edef (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
/*
   loop-5.c from the execute part of the gcc torture tests.
 */

#include <testfwk.h>

#ifdef __SDCC
#pragma std_c99
#endif

static int ap(int i);
static void testit(void){
  int ir[4] = {0,1,2,3};
  int ix,n,m;
  n=1; m=3;
  for (ix=1;ix<=4;ix++) {
    if (n == 1) m = 4;
    else        m = n-1;
    ap(ir[n-1]);
    n = m;
  }
}

static int t = 0;
static int a[4];

static int ap(int i){
  if (t > 3)
    ASSERT (0);
  a[t++] = i;
  return 1;
}

void
testTortureExecute (void)
{
  testit();
  if (a[0] != 0)
    ASSERT (0);
  if (a[1] != 3)
    ASSERT (0);
  if (a[2] != 2)
    ASSERT (0);
  if (a[3] != 1)
    ASSERT (0);
  return;
}