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

Knock off two bytes from getcwd(), cbm_read() and cbm_write().

Browse Source
This commit is contained in:
Sven Michael Klose
2020-10-25 14:27:26 +01:00
committed by greg-king5
parent e0c12c90cd
commit 3957310950
3 changed files with 22 additions and 22 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
libsrc/cbm/cbm_read.s
View File

@@ -45,11 +45,11 @@
_cbm_read: _cbm_read:
eor #$FF inx
sta ptr1 stx ptr1+1
txa tax
eor #$FF inx
sta ptr1+1 ; Save -size-1 stx ptr1 ; Save size with each byte incremented.
jsr popax jsr popax
sta ptr2 sta ptr2
@@ -92,9 +92,9 @@ _cbm_read:
bne @L3 bne @L3
inc ptr3+1 ; ++bytesread; inc ptr3+1 ; ++bytesread;
@L3: inc ptr1 @L3: dec ptr1
bne @L1 bne @L1
inc ptr1+1 dec ptr1+1
bne @L1 bne @L1
@L4: jsr CLRCH @L4: jsr CLRCH

14
libsrc/cbm/cbm_write.s
View File

@@ -39,11 +39,11 @@
_cbm_write: _cbm_write:
sta ptr3 sta ptr3
stx ptr3+1 ; Save size stx ptr3+1 ; Save size
eor #$FF inx
sta ptr1 stx ptr1+1
txa tax
eor #$FF inx
sta ptr1+1 ; Save -size-1 stx ptr1 ; Save size with each byte incremented
jsr popax jsr popax
sta ptr2 sta ptr2
@@ -69,9 +69,9 @@ _cbm_write:
@L2: jsr BSOUT ; cbm_k_bsout (A); @L2: jsr BSOUT ; cbm_k_bsout (A);
@L3: inc ptr1 ; --size; @L3: dec ptr1 ; --size;
bne @L1 bne @L1
inc ptr1+1 dec ptr1+1
bne @L1 bne @L1
jsr CLRCH jsr CLRCH

16
libsrc/common/getcwd.s
View File

@@ -17,22 +17,22 @@
.proc _getcwd .proc _getcwd
; Remember -size-1 because this simplifies the following loop ; Remember size with each byte incremented because this simplifies the following loop
eor #$FF inx
sta ptr2 stx ptr2+1
txa tax
eor #$FF inx
sta ptr2+1 stx ptr2
jsr popptr1 ; Get buf to ptr1 jsr popptr1 ; Get buf to ptr1
; Copy __cwd to the given buffer checking the length ; Copy __cwd to the given buffer checking the length
; ldy #$00 is guaranteed by popptr1 ; ldy #$00 is guaranteed by popptr1
loop: inc ptr2 loop: dec ptr2
bne @L1 bne @L1
inc ptr2+1 dec ptr2+1
beq overflow beq overflow
; Copy one character, end the loop if the zero terminator is reached. We ; Copy one character, end the loop if the zero terminator is reached. We