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

   1 ;
   2 ; Ullrich von Bassewitz, 25.11.2002
   3 ;
   4 ; CC65 runtime: Swap 1 byte of register variable space
   5 ;
   6
   7         .export         regswap1
   8         .importzp       sp, regbank
   9
  10 .proc   regswap1
  11
  12         lda     regbank,x               ; Get old value
  13         pha                             ; Save it
  14         lda     (sp),y                  ; Get stack loc
  15         sta     regbank,x               ; Store new value
  16         pla
  17         sta     (sp),y                  ; Store old value
  18         rts
  19
  20 .endproc
  21
  22