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

   1 ;
   2 ; Ullrich von Bassewitz, 29.12.1999
   3 ;
   4 ; CC65 runtime: Exchange lo and hi part of eax
   5 ;
   6
   7         .export         swapeax
   8         .importzp       sreg
   9
  10 swapeax:
  11         ldy     sreg
  12         sta     sreg
  13         lda     sreg+1
  14         stx     sreg+1
  15         tax
  16         tya
  17         rts
  18