1//Original:/testcases/core/c_calla_ljump/c_calla_ljump.dsp
2// Spec Reference: progctrl calla ljump
3# mach: bfin
4
5.include "testutils.inc"
6	start
7
8
9INIT_R_REGS 0;
10
11JUMP.L SUBR;
12
13JBACK:
14
15CHECKREG r0, 0x00000000;
16CHECKREG r1, 0x00001111;
17CHECKREG r2, 0x00000000;
18CHECKREG r3, 0x00000000;
19CHECKREG r4, 0x00000000;
20CHECKREG r5, 0x00000000;
21CHECKREG r6, 0x00000000;
22CHECKREG r7, 0x00000000;
23
24pass
25
26SUBR:				// should jump here
27	R1.L = 0x1111;
28	JUMP.L JBACK;
29	R2.L = 0x2222;		// should not go here
30	JUMP.L JBACK;
31RTS;
32