gas/testsuite/gas/m68hc11/lbranch.s

   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
  27 Lend:
  28         bhi     external_op
  29         bls     external_op
  30         bsr     out
  31         ldx     #12
  32 toto:
  33         rts
  34         .skip 100
  35 bidule:
  36         rts
  37         .sect ".page0"
  38 dir:
  39         .long 0
  40
  41         ; END