1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
|
;;; Bug #1825: gas assemble PC-relative indexed addressing modes incorrectly
;;; http://savannah.gnu.org/bugs/?func=detailbug&bug_id=1825&group_id=2424
;;;
.sect .text
.globl _main
_main:
nop
ldx L1,pc ; Assemble to 5-bit > 0 offset
bra L2
L1:
.dc.w 0xaabb
L2:
subd L1,pc ; Assemble to 5-bit < 0 offset
L3:
.ds.b 14, 0xA7
ldab L3,pc ; 5-bit < 0 offset
ldab L4,pc ; 5-bit > 0 offset
.skip 15
L4:
.skip 128
subd L4,pc ; 9-bit < 0 offset
addd L5,pc ; 9-bit > 0 offset
.skip 128
L5:
.skip 256-3
orab L5,pc ; 9 bit < 0 offset (min value)
oraa L6,pc ; 9 bit > 0 offset (max value)
.skip 255
L6:
.skip 256-2
orab L6,pc ; 16 bit < 0 offset
anda _main,pc ; 16 bit < 0 offset
andb L7,pc
.skip 256
L7:
stab external,pc ; External 16-bit PCREL
ldd _table,pc
addd _table+2,pc
subd _table+4,pc
addd _table+8,pc
addd _table+12,pc
addd _table+16,pc
rts
nop
_table:
.ds.b 16,0
leax _table,sp ; 16-bit absolute reloc
leay _table,x
leax _table,y
|
