]> git.sur5r.net Git - cc65/blob - libsrc/runtime/compl.s
This commit was generated by cvs2svn to compensate for changes in r2,
[cc65] / libsrc / runtime / compl.s
1 ;
2 ; Ullrich von Bassewitz, 06.08.1998
3 ;
4 ; CC65 runtime: integer complement
5 ;
6
7         .export         complax
8
9 complax:
10         eor     #$FF            ; Not A
11         pha
12         txa
13         eor     #$FF            ; Not X
14         tax
15         pla
16         rts
17