;
; 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