1
0
mirror of https://github.com/cc65/cc65.git synced 2024-11-02 18:06:48 +00:00
cc65/libsrc/geos-common/memory/cmpfstring.s

22 lines
426 B
ArmAsm
Raw Normal View History

;
; Maciej 'YTM/Elysium' Witkowiak
;
; 22.12.99, 29.07.2000
; char CmpFString (char length, char *dest, char* source);
.import DoubleSPop, SetPtrXY
.import popa, return0, return1
.export _CmpFString
.include "jumptab.inc"
_CmpFString:
jsr DoubleSPop
jsr popa
jsr SetPtrXY
jsr CmpFString
bne L1
jmp return0
L1: jmp return1