Apple-2-SW/a2fc.system
1
0
Fork 0
mirror of https://github.com/a2-4am/a2fc.system.git synced 2024-06-04 08:29:37 +00:00
Code Issues Projects Releases Wiki Activity

combine error conditions for open and read

Browse Source
This commit is contained in:
4am 2018-01-08 10:51:53 -05:00
parent c644c8b0c7
commit bc30b62afd
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/a2fc.system.a
View File

@ -59,9 +59,8 @@ CodeStart
Open
!byte kMLIOpen ; stack-based params for Open MLI call
!word mliParamForOpen
bcs Quit ; file not found or other error? quit immediately
jsr Read1 ; read first half of graphic (belongs in auxmem)
bcs Close ; read error? close & quit
bcs Close ; error during open or read? close & quit
;DHGRCopy
sta $C00A
sta $C000