1
0
mirror of https://github.com/cc65/cc65.git synced 2024-11-09 19:05:21 +00:00
cc65/libsrc/runtime/and.s

29 lines
407 B
ArmAsm
Raw Normal View History

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