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

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

View File

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

View File

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