Reinstated OSFILE error handling that I broke!

2024-06-25 15:29:37 +00:00 · 2021-08-22 16:59:07 -04:00 · 2021-08-22 16:59:07 -04:00 · c4f20036f9
commit c4f20036f9
parent db41a7a7da
3 changed files with 5 additions and 1 deletions
--- a/applecorn.po
+++ b/applecorn.po
--- a/auxmem.oscli.s
+++ b/auxmem.oscli.s
@ -72,6 +72,7 @@ CLIHND      PHX
            JSR   STRCMP
            BCS   :S6
            JSR   STARSAVE
+            BRA   :IEXIT
 :S6         LDA   #<:RUN
            STA   ZP2
            LDA   #>:RUN
--- a/mainmem.s
+++ b/mainmem.s
@ -478,7 +478,9 @@ LOADFILE    >>>   ENTMAIN
 :BLOCKS     DB    $00

 * Copy FILEBLK to AUXBLK in aux memory
-COPYFB      LDX   #$00
+* Preserves A
+COPYFB      PHA
+            LDX   #$00
 :L1         LDA   FILEBLK,X
            TAY
            >>>   ALTZP              ; Alt ZP and LC
@ -488,6 +490,7 @@ COPYFB      LDX   #$00
            INX
            CPX   #18                ; 18 bytes in FILEBLK
            BNE   :L1
+            PLA
            RTS

 * ProDOS file handling for MOS OSFILE SAVE call