Retro68/binutils/ld/testsuite/ld-powerpc/aix-glink-2c.s
2012-03-26 21:18:29 +02:00

34 lines
480 B
ArmAsm

.toc
.macro defabs,type,name,value
\type \name
\name = \value
.endm
.macro deffun,type,name
\type \name
.csect \name\()[DS]
\name\():
.long \name\()[PR],TOC[TC0],0
.globl .\name
.csect .\name\()[PR]
.\name\():
nop
.endm
.macro defdata,type,name,contents
\type \name
.csect \name\()[RW]
\name\():
.long \contents
.endm
defabs .globl,a1,0xf400
deffun .globl,a2
defdata .globl,a3,0x4400
defabs .globl,c1,0xf500
deffun .globl,c2
defdata .globl,c3,0x5500