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