bslathi19/cc65
1
0
Fork 0
Code Issues Pull Requests Actions 1 Packages Projects Releases Wiki Activity

Small optimization

Browse Source 
git-svn-id: svn://svn.cc65.org/cc65/trunk@2149 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
cuz
2003-05-05 17:05:22 +00:00
parent 7b4d3b9a9f
commit 62dbbcc4b6
2 changed files with 6 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
libsrc/common/strcat.s
View File

@@ -6,7 +6,7 @@
.export _strcat .export _strcat
.import popax .import popax
.importzp ptr1, ptr2, ptr3 .importzp ptr1, ptr2, tmp3
_strcat: _strcat:
sta ptr1 ; Save src sta ptr1 ; Save src
@@ -14,8 +14,7 @@ _strcat:
jsr popax ; Get dest jsr popax ; Get dest
sta ptr2 sta ptr2
stx ptr2+1 stx ptr2+1
sta ptr3 ; Remember for function return sta tmp3 ; Remember for function return
stx ptr3+1
ldy #0 ldy #0
; find end of dest ; find end of dest
@@ -50,8 +49,7 @@ sc4: lda (ptr1),y
; done, return pointer to dest ; done, return pointer to dest
sc5: lda ptr3 sc5: lda tmp3 ; X does still contain high byte
ldx ptr3+1
rts rts

8
libsrc/common/strcpy.s
View File

@@ -6,7 +6,7 @@
.export _strcpy .export _strcpy
.import popax .import popax
.importzp ptr1, ptr2, ptr3 .importzp ptr1, ptr2, tmp3
_strcpy: _strcpy:
sta ptr1 ; Save src sta ptr1 ; Save src
@@ -14,8 +14,7 @@ _strcpy:
jsr popax ; Get dest jsr popax ; Get dest
sta ptr2 sta ptr2
stx ptr2+1 stx ptr2+1
sta ptr3 ; remember for function return sta tmp3 ; remember for function return
stx ptr3+1
ldy #$00 ldy #$00
L1: lda (ptr1),y L1: lda (ptr1),y
@@ -27,7 +26,6 @@ L1: lda (ptr1),y
inc ptr2+1 inc ptr2+1
bne L1 bne L1
L9: lda ptr3 L9: lda tmp3 ; X still contains high byte
ldx ptr3+1
rts rts