summaryrefslogtreecommitdiff
path: root/testsuite/tests/cps/cps028.cmm
blob: 57c897ef898177362cab8b00075a729850d46301 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
// Test classic dead-code elimination

sum (bits32 a, bits32 n) {
  bits32 i, p, lim, sum; 
  sum = 0;
  i = 0;
  p = a;
  lim = a + 4 * n;
 L:
  if (p < lim) {
    sum = sum + bits32[p];
    i = i + 1;
    p = p + 4;
    goto L;
  }
  return (sum);
}