The spans do now contain the size of a span, no longer the end offset.

[cc65] / libsrc / common / strcpy.s

diff --git a/libsrc/common/strcpy.s b/libsrc/common/strcpy.s
index a0194db9c16e2843e495b9acd617165f7099d22c..a48f0e35a52b4c9213cee9bea1dbe9f4f34aeb4f 100644 (file)
--- a/libsrc/common/strcpy.s
+++ b/libsrc/common/strcpy.s
@@ -6,7 +6,7 @@
 
        .export         _strcpy
        .import         popax
-       .importzp       ptr1, ptr2, ptr3
+       .importzp       ptr1, ptr2
 
 _strcpy:
        sta     ptr1            ; Save src
@@ -14,8 +14,6 @@ _strcpy:
        jsr     popax           ; Get dest
        sta     ptr2
        stx     ptr2+1
-       sta     ptr3            ; remember for function return
-       stx     ptr3+1
        ldy     #$00
 
 L1:    lda     (ptr1),y
@@ -27,7 +25,6 @@ L1:   lda     (ptr1),y
        inc     ptr2+1
        bne     L1
 
-L9:    lda     ptr3
-       ldx     ptr3+1
+L9:            lda     ptr2            ; X still contains high byte
        rts