bneg.s



;
; Ullrich von Bassewitz, 05.08.1998
;
; CC65 runtime: boolean negation
;

       	.export		bnega, bnegax
	.import		return0, return1

bnegax:	cpx	#0
  	bne	L0
bnega: 	tax
  	bne	L0
L1:	lda	#1		; Zero already in X
   	rts

L0:	ldx	#0
	txa
	rts



Valid HTML 4.0! bneg.s.html; generated on Sat Oct 13 22:41:33 2001 by ca65html
uz@cc65.org