1
0
mirror of https://github.com/cc65/cc65.git synced 2024-10-31 04:04:49 +00:00
cc65/libsrc/runtime/lneg.s

32 lines
476 B
ArmAsm

;
; Ullrich von Bassewitz, 06.08.1998
;
; CC65 runtime: negation on longs
;
;
; eax = -eax
;
.export negeax
.importzp sreg
negeax: clc
eor #$FF
adc #1
pha
txa
eor #$FF
adc #0
tax
lda sreg
eor #$FF
adc #0
sta sreg
lda sreg+1
eor #$FF
adc #0
sta sreg+1
pla
rts