gas/testsuite/gasp/macro.out

   1 !       .MACRO  SUM FROM=0, TO=9
   2 !       ; \FROM \TO
   3 !       MOV     R\FROM,R10
   4 !COUNT  .ASSIGNA        \FROM+1
   5 !       .AWHILE \&COUNT LE \TO
   6 !       MOV     R\&COUNT,R10
   7 !COUNT  .ASSIGNA        \&COUNT+1
   8 !       .AENDW
   9 !       .ENDM
  10 !
  11
  12 !       SUM 0,5
  13 !       ; 0 5
  14         ; 0 5
  15 !       MOV     R0,R10
  16         MOV     R0,R10
  17 !COUNT  .ASSIGNA        0+1
  18 !       .AWHILE \&COUNT LE 5
  19 !       MOV     R\&COUNT,R10
  20 !COUNT  .ASSIGNA        \&COUNT+1
  21 !       .AENDW
  22 !       MOV     R\&COUNT,R10
  23         MOV     R1,R10
  24 !COUNT  .ASSIGNA        \&COUNT+1
  25 !       .AWHILE \&COUNT LE 5
  26 !       MOV     R\&COUNT,R10
  27 !COUNT  .ASSIGNA        \&COUNT+1
  28 !       .AENDW
  29 !       MOV     R\&COUNT,R10
  30         MOV     R2,R10
  31 !COUNT  .ASSIGNA        \&COUNT+1
  32 !       .AWHILE \&COUNT LE 5
  33 !       MOV     R\&COUNT,R10
  34 !COUNT  .ASSIGNA        \&COUNT+1
  35 !       .AENDW
  36 !       MOV     R\&COUNT,R10
  37         MOV     R3,R10
  38 !COUNT  .ASSIGNA        \&COUNT+1
  39 !       .AWHILE \&COUNT LE 5
  40 !       MOV     R\&COUNT,R10
  41 !COUNT  .ASSIGNA        \&COUNT+1
  42 !       .AENDW
  43 !       MOV     R\&COUNT,R10
  44         MOV     R4,R10
  45 !COUNT  .ASSIGNA        \&COUNT+1
  46 !       .AWHILE \&COUNT LE 5
  47 !       MOV     R\&COUNT,R10
  48 !COUNT  .ASSIGNA        \&COUNT+1
  49 !       .AENDW
  50 !       MOV     R\&COUNT,R10
  51         MOV     R5,R10
  52 !COUNT  .ASSIGNA        \&COUNT+1
  53 !       .AWHILE \&COUNT LE 5
  54 !       MOV     R\&COUNT,R10
  55 !COUNT  .ASSIGNA        \&COUNT+1
  56 !       .AENDW
  57 !       SUM     TO=5
  58 !       ; 0 5
  59         ; 0 5
  60 !       MOV     R0,R10
  61         MOV     R0,R10
  62 !COUNT  .ASSIGNA        0+1
  63 !       .AWHILE \&COUNT LE 5
  64 !       MOV     R\&COUNT,R10
  65 !COUNT  .ASSIGNA        \&COUNT+1
  66 !       .AENDW
  67 !       MOV     R\&COUNT,R10
  68         MOV     R1,R10
  69 !COUNT  .ASSIGNA        \&COUNT+1
  70 !       .AWHILE \&COUNT LE 5
  71 !       MOV     R\&COUNT,R10
  72 !COUNT  .ASSIGNA        \&COUNT+1
  73 !       .AENDW
  74 !       MOV     R\&COUNT,R10
  75         MOV     R2,R10
  76 !COUNT  .ASSIGNA        \&COUNT+1
  77 !       .AWHILE \&COUNT LE 5
  78 !       MOV     R\&COUNT,R10
  79 !COUNT  .ASSIGNA        \&COUNT+1
  80 !       .AENDW
  81 !       MOV     R\&COUNT,R10
  82         MOV     R3,R10
  83 !COUNT  .ASSIGNA        \&COUNT+1
  84 !       .AWHILE \&COUNT LE 5
  85 !       MOV     R\&COUNT,R10
  86 !COUNT  .ASSIGNA        \&COUNT+1
  87 !       .AENDW
  88 !       MOV     R\&COUNT,R10
  89         MOV     R4,R10
  90 !COUNT  .ASSIGNA        \&COUNT+1
  91 !       .AWHILE \&COUNT LE 5
  92 !       MOV     R\&COUNT,R10
  93 !COUNT  .ASSIGNA        \&COUNT+1
  94 !       .AENDW
  95 !       MOV     R\&COUNT,R10
  96         MOV     R5,R10
  97 !COUNT  .ASSIGNA        \&COUNT+1
  98 !       .AWHILE \&COUNT LE 5
  99 !       MOV     R\&COUNT,R10
 100 !COUNT  .ASSIGNA        \&COUNT+1
 101 !       .AENDW
 102 !       SUM     FROM=2, TO=5
 103 !       ; 2 5
 104         ; 2 5
 105 !       MOV     R2,R10
 106         MOV     R2,R10
 107 !COUNT  .ASSIGNA        2+1
 108 !       .AWHILE \&COUNT LE 5
 109 !       MOV     R\&COUNT,R10
 110 !COUNT  .ASSIGNA        \&COUNT+1
 111 !       .AENDW
 112 !       MOV     R\&COUNT,R10
 113         MOV     R3,R10
 114 !COUNT  .ASSIGNA        \&COUNT+1
 115 !       .AWHILE \&COUNT LE 5
 116 !       MOV     R\&COUNT,R10
 117 !COUNT  .ASSIGNA        \&COUNT+1
 118 !       .AENDW
 119 !       MOV     R\&COUNT,R10
 120         MOV     R4,R10
 121 !COUNT  .ASSIGNA        \&COUNT+1
 122 !       .AWHILE \&COUNT LE 5
 123 !       MOV     R\&COUNT,R10
 124 !COUNT  .ASSIGNA        \&COUNT+1
 125 !       .AENDW
 126 !       MOV     R\&COUNT,R10
 127         MOV     R5,R10
 128 !COUNT  .ASSIGNA        \&COUNT+1
 129 !       .AWHILE \&COUNT LE 5
 130 !       MOV     R\&COUNT,R10
 131 !COUNT  .ASSIGNA        \&COUNT+1
 132 !       .AENDW
 133 !
 134
 135 !
 136
 137 !; hi this is a comment
 138         ; hi this is a comment
 139 !       .MACRO  BACK_SLASH_SET
 140 !       \(MOV   #"\",R0)
 141 !       .ENDM
 142 !       BACK_SLASH_SET
 143 !       MOV     #"\",R0
 144         MOV     #"\",R0
 145 !       .MACRO  COMM
 146 !       bar     ; this comment will get copied out
 147 !       foo     \; this one will get dropped
 148 !       .ENDM
 149 !       COMM
 150 !       bar     ; this comment will get copied out
 151         bar     ; this comment will get copied out
 152 !       foo     \; this one will get dropped
 153         foo     \; this one will get dropped
 154 !       BACK_SLASH_SET
 155 !       MOV     #"\",R0
 156         MOV     #"\",R0
 157 !       .MACRO  PLUS2
 158 !       ADD     #1,R\&V1
 159 !       .SDATA  "\&V'1"
 160 !       .ENDM
 161 !V      .ASSIGNC        "R"
 162 !V1     .ASSIGNA        1
 163 !       PLUS2
 164 !       ADD     #1,R\&V1
 165         ADD     #1,R1
 166 !       .SDATA  "\&V'1"
 167         .byte   82,49
 168 !       .MACRO  PLUS1   P,P1
 169 !       ADD     #1,\P1
 170 !       .SDATA  "\P'1"
 171 !       .ENDM
 172 !       PLUS1   R,R1
 173 !       ADD     #1,R1
 174         ADD     #1,R1
 175 !       .SDATA  "R1"
 176         .byte   82,49
 177 !
 178
 179 !       .MACRO  SUM P1
 180 !       MOV     R0,R10
 181 !       ADD     R1,R10
 182 !       ADD     R2,R10
 183 !       \P1
 184 !       ADD     R3,R10
 185 !       .ENDM
 186 !
 187
 188 !       SUM     .EXITM
 189 !       MOV     R0,R10
 190         MOV     R0,R10
 191 !       ADD     R1,R10
 192         ADD     R1,R10
 193 !       ADD     R2,R10
 194         ADD     R2,R10
 195 !       .EXITM
 196 !
 197
 198 !       .MACRO foo bar=a default=b
 199 !       \bar
 200 !       \default
 201 !       bar
 202 !       default
 203 !       .ENDM
 204 !       foo default=dog bar=cat
 205 !       cat
 206         cat
 207 !       dog
 208         dog
 209 !       bar
 210         bar
 211 !       default
 212         default
 213 !       foo X Y
 214 !       X
 215         X
 216 !       Y
 217         Y
 218 !       bar
 219         bar
 220 !       default
 221         default
 222 !       foo
 223 !       a
 224         a
 225 !       b
 226         b
 227 !       bar
 228         bar
 229 !       default
 230         default
 231 !       foo bar=cat default=dog
 232 !       cat
 233         cat
 234 !       dog
 235         dog
 236 !       bar
 237         bar
 238 !       default
 239         default
 240 !
 241
 242 !
 243
 244 !       .MACRO  foo bar
 245 !       HI
 246 !       HI \bar
 247 !       HI
 248 !       .ENDM
 249 !
 250
 251 !       foo 1
 252 !       HI
 253         HI
 254 !       HI 1
 255         HI 1
 256 !       HI
 257         HI
 258 !       foo 123
 259 !       HI
 260         HI
 261 !       HI 123
 262         HI 123
 263 !       HI
 264         HI
 265 !       foo 1 2 3 4
 266 !       foo
 267 !       HI
 268         HI
 269 !       HI
 270         HI
 271 !       HI
 272         HI
 273 !
 274
 275 !
 276 !       .MACRO  PUSH Rn
 277 !       MOV.L   \Rn,@-r15
 278 !       .ENDM
 279 !       PUSH    R0
 280 !       MOV.L   R0,@-r15
 281         MOV.L   R0,@-r15
 282 !       PUSH    R1
 283 !       MOV.L   R1,@-r15
 284         MOV.L   R1,@-r15
 285 !
 286
 287 !
 288
 289 !       .MACRO  RES_STR STR, Rn
 290 !       MOV.L   #str\@,\Rn
 291 !       BRA     end_str\@
 292 !       NOP
 293 !str\@  .SDATA "\STR"
 294 !       .ALIGN  2
 295 !end_str\@
 296 !       .ENDM
 297 !
 298 !       RES_STR "ONE",R0
 299 !       MOV.L   #str00018,R0
 300         MOV.L   #str00018,R0
 301 !       BRA     end_str00018
 302         BRA     end_str00018
 303 !       NOP
 304         NOP
 305 !str00018       .SDATA "ONE"
 306 str00018:       .byte   79,78,69
 307 !       .ALIGN  2
 308         .align  2
 309 !end_str00018
 310 end_str00018:
 311 !       RES_STR "TWO",R1
 312 !       MOV.L   #str00019,R1
 313         MOV.L   #str00019,R1
 314 !       BRA     end_str00019
 315         BRA     end_str00019
 316 !       NOP
 317         NOP
 318 !str00019       .SDATA "TWO"
 319 str00019:       .byte   84,87,79
 320 !       .ALIGN  2
 321         .align  2
 322 !end_str00019
 323 end_str00019:
 324 !       RES_STR "THREE",R2
 325 !       MOV.L   #str00020,R2
 326         MOV.L   #str00020,R2
 327 !       BRA     end_str00020
 328         BRA     end_str00020
 329 !       NOP
 330         NOP
 331 !str00020       .SDATA "THREE"
 332 str00020:       .byte   84,72,82,69,69
 333 !       .ALIGN  2
 334         .align  2
 335 !end_str00020
 336 end_str00020:
 337 !
 338
 339 !
 340
 341 !
 342
 343 !       RES_STR STR=donkey Rn=R1
 344 !       MOV.L   #str00021,R1
 345         MOV.L   #str00021,R1
 346 !       BRA     end_str00021
 347         BRA     end_str00021
 348 !       NOP
 349         NOP
 350 !str00021       .SDATA "donkey"
 351 str00021:       .byte   100,111,110,107,101,121
 352 !       .ALIGN  2
 353         .align  2
 354 !end_str00021
 355 end_str00021:
 356 !       RES_STR donkey,R1
 357 !       MOV.L   #str00022,R1
 358         MOV.L   #str00022,R1
 359 !       BRA     end_str00022
 360         BRA     end_str00022
 361 !       NOP
 362         NOP
 363 !str00022       .SDATA "donkey"
 364 str00022:       .byte   100,111,110,107,101,121
 365 !       .ALIGN  2
 366         .align  2
 367 !end_str00022
 368 end_str00022:
 369 !       RES_STR donkey Rn=R1
 370 !       MOV.L   #str00023,R1
 371         MOV.L   #str00023,R1
 372 !       BRA     end_str00023
 373         BRA     end_str00023
 374 !       NOP
 375         NOP
 376 !str00023       .SDATA "donkey"
 377 str00023:       .byte   100,111,110,107,101,121
 378 !       .ALIGN  2
 379         .align  2
 380 !end_str00023
 381 end_str00023:
 382 !       .END