Some minor cleanups.

This commit is contained in:
Oliver Schmidt 2018-07-26 14:35:26 +02:00
parent e949a3e642
commit e86a7db18b
3 changed files with 5 additions and 9 deletions

View file

@ -17,14 +17,14 @@
.export _dio_log_to_phys
.include "atari.inc"
.importzp ptr1,ptr2,ptr3
.import popax, popptr1, __oserror
.import popax,popptr1,__oserror
.proc _dio_log_to_phys
sta ptr2
stx ptr2+1 ; pointer to output structure
jsr popptr1 ; save pointer to input data
jsr popptr1 ; save pointer to input data
jsr popax
sta ptr3

View file

@ -16,7 +16,7 @@
.export __sio_call
.include "atari.inc"
.import popa, popax, popptr1
.import popa,popax,popptr1
.import sectsizetab,__oserror
.importzp ptr1

View file

@ -8,16 +8,12 @@
.import incsp2
.importzp sp, ptr1
.macpack cpu
.proc popptr1 ; 14 bytes (four usages = at least 2 bytes saved)
.proc popptr1 ; 14 bytes (four usages = at least 2 bytes saved)
ldy #1
lda (sp),y ; get hi byte
sta ptr1+1 ; into ptr hi
dey ; no optimization for 65C02 here to have Y=0 at exit!
dey ; no optimization for 65C02 here to have Y=0 at exit!
lda (sp),y ; get lo byte
sta ptr1 ; to ptr lo
jmp incsp2
.endproc