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

Little strdup optimisation

Browse Source 
-12 bytes on disk
-20 cycles per strdup
-6 cycles per strlen called from strdup
This commit is contained in:
Colin Leroy-Mira
2024-01-05 19:39:03 +01:00
parent 169c9c0da0
commit 3a439e0e1b
4 changed files with 51 additions and 73 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
libsrc/common/strcspn.s
View File

@@ -7,13 +7,13 @@
.export _strcspn
.import popptr1, _strlen
.importzp ptr1, ptr2, tmp1, tmp2
.importzp ptr1, ptr4, tmp1, tmp2
_strcspn:
jsr _strlen ; get length in a/x and transfer s2 to ptr2
jsr _strlen ; get length in a/x and transfer s2 to ptr4
; Note: It does not make sense to
; have more than 255 test chars, so
; we don't support a high byte here! (ptr2+1 is
; we don't support a high byte here! (ptr4+1 is
; also unchanged in strlen then (important!))
; -> the original implementation also
; ignored this case
@@ -38,7 +38,7 @@ checkNext:
iny
check: cpy tmp1 ; compare with length of test character string
beq endOfTestChars
cmp (ptr2),y ; found matching char?
cmp (ptr4),y ; found matching char?
bne checkNext
leave: txa ; restore position of finding