]> git.ipfire.org Git - thirdparty/binutils-gdb.git/blame - gas/testsuite/gas/z80/z80_reloc.s
Add support for 8-bit and 24-bit shifts in the z80 assembler.
[thirdparty/binutils-gdb.git] / gas / testsuite / gas / z80 / z80_reloc.s
CommitLineData
6655dba2
SB
1 .text
2 .globl glb_proc
3 .globl data8
4 .globl data16
5 .globl data24
6 .globl data32
7.L_proc:
8 ld (hl),.L_proc >> 0
9 inc hl
10 ld (hl),.L_proc >> 8
11 inc hl
12 ld (hl),(glb_proc) & 0xff
13 inc hl
14 ld (hl),glb_proc >> 8
15 inc hl
16 ld (hl),glb_proc >> 16
17 inc hl
18 ld (hl),glb_proc >> 24
19 ld bc,.L_label
20 ld de,glb_proc >> 0
21 ld hl,glb_proc >> 16
22 djnz start
23 ld a,data8
24 ret
25.L_label:
26 .db data8
27 .dw data16
e4b1ab20
SB
28 .d24 data24
29 .d32 data32
6655dba2
SB
30 .db data16 & 0xff
31 .db data16 >> 8
32 .dw data32 & 0xffff
33 .dw data32 >> 16
e4b1ab20
SB
34 .dw data32 >> 24
35 .dw data24 >> 8
36 .dw data32 >> 8
6655dba2 37 .end