1# Test for the 68HC11 long branch switch
2	.text
3	.globl	_rcall
4	.globl _start
5_start:
6_rcall:
7	ldaa	#0x10		;86 10
8	jbra	Lend		; Must be switched to a jmp
9	jbsr	toto		; -> to a jsr
10	jbne	toto		; -> to a beq+jmp
11	jbeq	toto		; -> to a bne+jmp
12	jbcs	toto		; -> to a bcc+jmp
13	jbcc	toto		; -> to a bcs+jmp
14	xgdx
15	xgdx
16	beq	bidule		; -> to a bne+jmp
17	bcs	bidule		; -> to a bcc+jmp
18	bcc	bidule		; -> to a bcs+jmp
19	xgdx
20	jbra	200
21	jbsr	1923
22	bne	Lend		; -> to a beq+jmp
23	jbsr	toto
24	jbeq	toto
25	.skip 200
26	ldaa	*dir		;96 33
27Lend:
28	bhi	external_op
29	bls	external_op
30	bsr	out
31	ldx	#12
32toto:
33	rts
34	.skip 100
35bidule:
36	rts
37	.sect ".page0"
38dir:
39	.long 0
40
41	; END
42