ld/testsuite/ld-powerpc/aix-glink-2c.s

   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