;
; Ullrich von Bassewitz, 06.08.1998
;
; CC65 runtime: boolean negation for longs
;
.export bnegeax
.importzp sreg, tmp1bnegeax:
stx tmp1
ldx #0 ; High byte of result
ora tmp1
ora sreg
ora sreg+1
bne @L0
lda #1
rts
@L0: txa ; X is zero
rts
lbneg.s.html; generated on Sat Oct 13 22:41:34 2001 by ca65html uz@cc65.org