.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 |