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

   1 ;
   2 ; Ullrich von Bassewitz, 2003-05-04
   3 ;
   4 ; CC65 runtime: Increment the stackpointer by 5
   5 ;
   6
   7         .export         incsp5
   8         .importzp       sp
   9
  10 .proc   incsp5
  11
  12         lda     sp
  13         clc
  14         adc     #5
  15         sta     sp
  16         bcs     @L1
  17         rts
  18
  19 @L1:    inc     sp+1
  20         rts
  21
  22 .endproc
  23
  24