Apple-2-SW/prog8
1
0 Fork 0
mirror of https://github.com/irmen/prog8.git synced 2026-10-22 05:02:58 +00:00
Code Issues Projects Releases Wiki Activity

optimize diskio.status_code() size

Browse Source
This commit is contained in:
Irmen de Jong committed 2026-02-20 20:52:49 +01:00
1 parent f2077cb56f
commit 9aff85f08a
2 files changed
+5 -11
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

compiler/res/prog8lib/cx16/bmx.p8
+2 -7
View File
@@ -45,7 +45,7 @@ bmx {
} else
error_message = "invalid bmx file"
} else
error_message = diskio.status()
error_message = "can't open file"
close()
return false
@@ -146,11 +146,6 @@ bmx {
old_drivenumber = diskio.drivenumber
diskio.drivenumber = drivenumber
if diskio.f_open_w(filename) {
cx16.r0 = diskio.status()
if cx16.r0[0]!='0' {
error_message = cx16.r0
goto save_end
}
diskio.reset_write_channel()
if write_header() {
if write_palette() {
@@ -161,7 +156,7 @@ bmx {
} else
error_message = "header error"
} else
error_message = diskio.status()
error_message = "can't open file"
save_end:
diskio.f_close_w()
diskio.drivenumber = old_drivenumber
compiler/res/prog8lib/cx16/diskio.p8
+3 -4
View File
@@ -717,9 +717,8 @@ io_error:
goto io_error
void cbm.CHKIN(15) ; use #15 as input channel
list_filename[0] = cbm.CHRIN()
list_filename[1] = cbm.CHRIN()
list_filename[2] = 0
cx16.r0L = (cbm.CHRIN()-'0') * 10
cx16.r0L += (cbm.CHRIN()-'0')
while cbm.READST()==0 {
void cbm.CHRIN()
@@ -727,7 +726,7 @@ io_error:
cbm.CLRCHN() ; restore default i/o devices
cbm.CLOSE(15)
return conv.str2ubyte(list_filename)
return cx16.r0L
io_error:
cbm.CLRCHN()