1 .toc 2 3 .macro defabs,type,name,value 4 \type \name 5 \name = \value 6 .endm 7 8 .macro deffun,type,name 9 \type \name 10 .csect \name\()[DS] 11 \name\(): 12 .long \name\()[PR],TOC[TC0],0 13 14 .globl .\name 15 .csect .\name\()[PR] 16 .\name\(): 17 nop 18 .endm 19 20 .macro defdata,type,name,contents 21 \type \name 22 .csect \name\()[RW] 23 \name\(): 24 .long \contents 25 .endm 26 27 defabs .globl,a1,0xf400 28 deffun .globl,a2 29 defdata .globl,a3,0x4400 30 31 defabs .globl,c1,0xf500 32 deffun .globl,c2 33 defdata .globl,c3,0x5500 34
