git.sur5r.net Git - cc65/blob - testcode/assembler/paramcount.s

   1 ; Test ca65's handling of the .paramcount read-only variable.
   2 ; .paramcount should see all given arguments, even when they are empty.
   3
   4 .macro  push    r1, r2, r3, r4, r5, r6
   5         .out    .sprintf(" .paramcount = %u", .paramcount)
   6 .if     .paramcount <> 0
   7 .ifblank        r1
   8         .warning        "r1 is blank!"
   9 .exitmacro
  10 .endif
  11         lda     r1
  12         pha
  13
  14         push    r2, r3, r4, r5, r6
  15 .endif
  16 .endmacro
  17
  18         push    1, , {}
  19         push    1, ,
  20         push    1