Apple-2-SW/prog8
1
0
Fork 0
mirror of https://github.com/irmen/prog8.git synced 2024-06-10 20:29:33 +00:00
Code Issues Projects Releases Wiki Activity

diskio.status_code(): Read the status til the end

Browse Source
This commit is contained in:
adiee5 2024-03-27 15:45:56 +01:00
parent 1463740ec5
commit b236b1e8f5
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
compiler/res/prog8lib/cx16/diskio.p8
View File

@ -543,6 +543,10 @@ io_error:
list_filename[1] = cbm.CHRIN()
list_filename[2] = 0
while cbm.READST()==0 {
cbm.CHRIN()
}
cbm.CLRCHN() ; restore default i/o devices
cbm.CLOSE(15)
return conv.str2ubyte(list_filename)