URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-old/] [binutils-2.18.50/] [gas/] [testsuite/] [gas/] [m68hc11/] [lbranch.s] - Rev 38
Go to most recent revision | Compare with Previous | Blame | View Log
# Test for the 68HC11 long branch switch .text .globl _rcall .globl _start _start: _rcall: ldaa #0x10 ;86 10 jbra Lend ; Must be switched to a jmp jbsr toto ; -> to a jsr jbne toto ; -> to a beq+jmp jbeq toto ; -> to a bne+jmp jbcs toto ; -> to a bcc+jmp jbcc toto ; -> to a bcs+jmp xgdx xgdx beq bidule ; -> to a bne+jmp bcs bidule ; -> to a bcc+jmp bcc bidule ; -> to a bcs+jmp xgdx jbra 200 jbsr 1923 bne Lend ; -> to a beq+jmp jbsr toto jbeq toto .skip 200 ldaa *dir ;96 33 Lend: bhi external_op bls external_op bsr out ldx #12 toto: rts .skip 100 bidule: rts .sect ".page0" dir: .long 0 ; END
Go to most recent revision | Compare with Previous | Blame | View Log