testsuite/tests/cps/cps026.cmm


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18

// Test stack check targets

// One with a target
foo1(bits32 x, bits32 y) goto L {
  bits32 z;
  foreign "C--" bar() "safe";
  return (z+12);
L:
  z = 3;
  return (z+13);
}

// And one without a target
foo2(bits32 x, bits32 y) {
  bits32 z;
  foreign "C--" bar() "safe";
  return (z+14);
}