git.sur5r.net Git - cc65/blob - libsrc/runtime/incax1.s

   1 ;
   2 ; Ullrich von Bassewitz, 05.08.1998
   3 ;
   4 ; CC65 runtime: Increment ax by 1
   5 ;
   6
   7         .export         incax1
   8
   9         .macpack        generic
  10         .macpack        cpu
  11
  12 .proc   incax1
  13
  14 .if (.cpu .bitand ::CPU_ISET_65SC02)
  15         ina                     ; 65C02 version
  16         bne     @L9
  17 .else
  18         add     #1
  19         bcc     @L9
  20 .endif
  21         inx
  22 @L9:    rts
  23
  24 .endproc