6502
/
cc65
mirror of https://github.com/cc65/cc65.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

Fixed formatting and two import issues.

This commit is contained in:
IrgendwerA8 2018-05-20 15:38:48 +02:00
parent c95ed4b8b5
commit 911b86de67
3 changed files with 9 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
libsrc/common/memchr.s
View File

@ -5,7 +5,7 @@
;
.export _memchr
.import popax, popptr1 return0
.import popax, popptr1, return0
.importzp ptr1, ptr2

2
libsrc/common/strncpy.s
View File

@ -5,7 +5,7 @@
;
.export _strncpy
.import popptr1
.import popax, popptr1
.importzp ptr1, ptr2, tmp1, tmp2, tmp3
.proc _strncpy

20
libsrc/runtime/popptr1.s
View File

@ -5,25 +5,19 @@
; X is untouched, low byte in A, Y is defined to be 0!
.export popptr1
.import incsp2
.import incsp2
.importzp sp, ptr1
.macpack cpu
.proc popptr1 ; 14 bytes,
.macpack cpu
.proc popptr1 ; 14 bytes (four usages = at least 2 bytes saved)
ldy #1
lda (sp),y ; get hi byte
sta ptr+1 ; into ptr hi
dey ; note: apply even for 65C02 to have Y=0 at exit!
.if (.cpu .bitand ::CPU_ISET_65SC02)
lda (sp) ; get lo byte
.else
sta ptr1+1 ; into ptr hi
dey ; no optimization for 65C02 here to have Y=0 at exit!
lda (sp),y ; get lo byte
.endif
sta ptr1 ; to ptr lo
jmp incsp2
sta ptr1 ; to ptr lo
jmp incsp2
.endproc