ld/testsuite/ld-z80/relocs.s

   1         .text
   2 ;       .org    0
   3
   4         .globl  label1
   5         .globl  label2
   6         .globl  label3
   7         .globl  label4
   8         .globl  label5
   9         .globl  label6
  10         .globl  label7
  11         .globl  label8
  12         .globl  label9
  13
  14         .globl  value8
  15         .globl  value8_1
  16         .globl  value8_2
  17         .globl  value8_3
  18         .globl  value16
  19         .globl  value24
  20         .globl  value32
  21
  22         .globl  field_0
  23         .globl  field_1
  24
  25         call    label1
  26         call    nz,label2
  27         call    z,label3
  28         call    nc,label4
  29         call    c,label5
  30         call    po,label6
  31         call    pe,label7
  32         call    p,label8
  33         call    m,label9
  34
  35         jp      label1
  36         jp      nz,label2
  37         jp      z,label3
  38         jp      nc,label4
  39         jp      c,label5
  40         jp      po,label6
  41         jp      pe,label7
  42         jp      p,label8
  43         jp      m,label9
  44
  45         ld      l,(ix+5)
  46         ld      a,(ix+field_0)
  47         ld      c,(ix+field_1-10)
  48         ld      b,(ix+field_1-11)
  49
  50 field_0_1       .equ    field_0+90
  51
  52         ld      (iy-5),l
  53         ld      (iy+field_0),a
  54         ld      (iy+field_1+10),c
  55         ld      (iy+field_1+11),b
  56         ld      h,(iy+field_0_1)
  57
  58         .ifdef ADLMODE
  59         ld.is   de,value32 >> 16
  60         ld.is   hl,value32 & 0xffff
  61         ld.is   de,(value32 + 0x12345678) >> 16
  62         ld.is   hl,(value32 + 0x12345678) & 0xffff
  63         .else
  64         ld      de,value32 >> 16
  65         ld      hl,value32 & 0xffff
  66         ld      de,(value32 + 0x12345678) >> 16
  67         ld      hl,(value32 + 0x12345678) & 0xffff
  68         .endif
  69
  70         ld      d,value32 >> 24
  71         ld      e,value32 >> 16
  72         ld      h,value32 >> 8
  73         ld      l,value32 >> 0
  74
  75         ld      d,(value32 + 0x12345678) >> 24
  76         ld      e,(value32 + 0x12345678) >> 16
  77         ld      h,(value32 + 0x12345678) >> 8
  78         ld      l,(value32 + 0x12345678) >> 0
  79
  80         .ifdef Z80N
  81         push    label1
  82         push    value16
  83         nextreg value8_1,value8_2
  84         nextreg value8_3,a
  85         ld      a,a
  86         .endif
  87
  88         .data
  89         .db     value8
  90         .dw     value16
  91         .d24    value24
  92         .d32    value32