2 ; Ullrich von Bassewitz, 31.05.1998
3 ; Christian Krueger: 2013-Jul-24, minor optimizations
5 ; char* strcat (char* dest, const char* src);
10 .importzp ptr1, ptr2, tmp3
17 sta tmp3 ; Remember for function return
19 .if (.cpu .bitand ::CPU_ISET_65SC02)
23 sta ptr2 ; access from page start, y contains low byte
36 sty ptr2 ; advance pointer to last y position
37 ldy #0 ; reset new y-offset
47 bne copyByte ; like bra here
49 ; return pointer to dest
50 done: lda tmp3 ; X does still contain high byte