Apple-2-SW/Applecorn
1
0
Fork 0
mirror of https://github.com/bobbimanners/Applecorn.git synced 2025-01-19 21:29:50 +00:00
Code Issues Projects Releases Wiki Activity

auxmem.hostfs.s/auxmem.misc.s: removed redundant PHP/SEI .. PLP

Browse Source
This commit is contained in:
Bobbi Webber-Manners 2022-09-20 15:28:59 -04:00
parent 8a19df857b
commit 0adf054973
2 changed files with 0 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
auxmem.hostfs.s
View File

@ -845,8 +845,6 @@ FSCTITLE RTS
PARSNAME JSR XYtoLPTR
PARSLPTR CLC ; Means parsing a filename
JSR GSINIT ; Init general string handling
PHP
SEI ; Disable IRQs
LDX #$00 ; Length
:L1 JSR GSREAD ; Handle next char
BCS :DONE
@ -861,7 +859,6 @@ PARSLPTR CLC ; Means parsing a filename
:DONE >>> WRTMAIN
STX MOSFILE ; Length byte (Pascal)
>>> WRTAUX
PLP ; IRQs back as they were
TXA ; Return len in A
RTS
@ -871,8 +868,6 @@ PARSLPTR CLC ; Means parsing a filename
PARSNAME2 JSR XYtoLPTR
PARSLPTR2 CLC ; Means parsing a filename
JSR GSINIT ; Init gen string handling
PHP
SEI ; Disable IRQs
LDX #$00 ; Length
:L1 JSR GSREAD ; Handle next char
BCS :DONE
@ -887,7 +882,6 @@ PARSLPTR2 CLC ; Means parsing a filename
:DONE >>> WRTMAIN
STX MOSFILE2 ; Length byte (Pascal)
>>> WRTAUX
PLP ; IRQs back as they were
TXA ; Return len in A
NOTERROR RTS

1
auxmem.misc.s
View File

@ -339,7 +339,6 @@ ROMSELECT
PHA
PHX
PHY
SEI
TXA ; A=ROM to select
>>> XF2MAIN,SELECTROM
ROMSELDONE >>> ENTAUX