6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2025-01-12 02:30:44 +00:00
Code Issues Projects Releases Wiki Activity

Merge pull request #653 from IrgendwerA8/cbm_rw_popptr1

Browse Source 
* Saved 6 bytes by using popptr1.

* Fix typo for import.

* Beautified comment.
This commit is contained in:
greg-king5 2018-05-23 00:31:53 -04:00 committed by GitHub
commit 486678e557
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
4 changed files with 17 additions and 20 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
libsrc/cbm/read.s
View File

@ -88,10 +88,10 @@
ldy #0
lda tmp1
sta (ptr2),y
inc ptr2
sta (ptr1),y
inc ptr1
bne @L1
inc ptr2+1 ; *buf++ = A;
inc ptr1+1 ; *buf++ = A;
; Increment the byte count
@ -107,9 +107,9 @@
; Decrement the count
@L3: inc ptr1
@L3: inc ptr2
bne @L0
inc ptr1+1
inc ptr2+1
bne @L0
beq done ; Branch always

15
libsrc/cbm/rwcommon.s
View File

@ -6,7 +6,7 @@
.export rwcommon
.import popax
.import popax, popptr1
.importzp ptr1, ptr2, ptr3, tmp2
.include "errno.inc"
@ -22,18 +22,15 @@
.proc rwcommon
eor #$FF
sta ptr1
sta ptr2
txa
eor #$FF
sta ptr1+1 ; Remember -count-1
sta ptr2+1 ; Remember -count-1
jsr popax ; Get buf
sta ptr2
stx ptr2+1
jsr popptr1 ; Get buf to ptr1, Y=0 by call
lda #$00
sta ptr3
sta ptr3+1 ; Clear ptr3
sty ptr3
sty ptr3+1 ; Clear ptr3
jsr popax ; Get the handle
cpx #$01

10
libsrc/cbm/write.s
View File

@ -61,10 +61,10 @@
; Output the next character from the buffer
@L0: ldy #0
lda (ptr2),y
inc ptr2
lda (ptr1),y
inc ptr1
bne @L1
inc ptr2+1 ; A = *buf++;
inc ptr1+1 ; A = *buf++;
@L1: jsr BSOUT
; Check the status
@ -84,9 +84,9 @@
; Decrement count
@L2: inc ptr1
@L2: inc ptr2
bne @L0
inc ptr1+1
inc ptr2+1
bne @L0
; Wrote all chars or disk full. Close the output channel

2
libsrc/geos-common/drivers/fio_module.s
View File

@ -13,7 +13,7 @@
FILEDES = 3 ; first free to use file descriptor
.importzp ptr1, ptr2, ptr3, tmp1
.import addysp, popax, poptr1
.import addysp, popax, popptr1
.import __oserror
.import _FindFile, _ReadByte
.export _open, _close, _read