;
; Ullrich von Bassewitz, 05.08.1998
;
; CC65 runtime: and on ints
;
.export tosanda0, tosandax
.import addysp1
.importzp sp, ptr4
tosanda0:
ldx #$00
tosandax:
.ifpc02
and (sp) ; 65C02 version, saves 2 cycles and 1 byte
ldy #1
.else
ldy #0
and (sp),y
iny
.endif
pha
txa
and (sp),y
tax
pla
jmp addysp1 ; drop TOS, set condition codes
and.s.html; generated on Sat Oct 13 22:41:32 2001 by ca65html