git.gag.com Git - debian/cc1111/blob - as/z80/tz80l.asm

   1         .sbttl  Assembler Link Tests
   2
   3         .module tz80l
   4
   5         ; This file and TCONST.ASM should be assembled and linked.
   6         ;
   7         ; ASZ80 -XGOL TZ80L
   8         ; ASZ80 -XGOL TCONST
   9         ;
  10         ; ASLINK -C
  11         ; -XMS
  12         ; TZ80L
  13         ; TCONST
  14         ; -E
  15         ;
  16         ; The following tests verify the correct processing of
  17         ; external references for the branches.
  18         ;
  19         ; *L signifies an error will be reported at link time.
  20
  21         ; branch test must be first
  22
  23         .area   TEST    (ABS,OVR)
  24
  25         .blkb   0x7E            ;bra1:
  26         jr      C,bra1          ;   38 00  [38 80]
  27         .blkb   0x7F            ;bra2:
  28         jr      C,bra2          ;*L 38 00  [38 7F]
  29         jr      C,bra3          ;   38 00  [38 7F]
  30         .blkb   0x7F
  31         .blkb   0x00            ;bra3:
  32         jr      C,bra4          ;*L 38 00  [38 [80]
  33         .blkb   0x80
  34         .blkb   0x00            ;bra4:
  35
  36         .blkb   0x7E            ;bra5:
  37         jr      C,bra5          ;   38 00  [38 80]
  38         .blkb   0x7F            ;bra6:
  39         jr      C,bra6          ;*L 38 00  [38 7F]
  40         jr      C,bra7          ;   38 00  [38 7F]
  41         .blkb   0x7F
  42         .blkb   0x00            ;bra7:
  43         jr      C,bra8          ;*L 38 00  [38 [80]
  44         .blkb   0x80
  45         .blkb   0x00            ;bra8:
  46
  47