Added "popptr1" which is of common use to save some bytes.

2018-05-20 15:30:18 +02:00
parent 3a6430b13d
commit c95ed4b8b5
35 changed files with 113 additions and 151 deletions
--- a/libsrc/apple2/rwcommon.s
+++ b/libsrc/apple2/rwcommon.s
@@ -3,7 +3,7 @@
 ;

        .export         rwprolog, rwcommon, rwepilog
-        .import         popax
+        .import         popax, popptr1

        .include        "zeropage.inc"
        .include        "errno.inc"
@@ -17,9 +17,7 @@ rwprolog:
        stx     ptr2+1

        ; Get and save buf
-        jsr     popax
-        sta     ptr1
-        stx     ptr1+1
+        jsr     popptr1

        ; Get and process fd
        jsr     popax