Skip to content

Commit 1145a34

Browse files
committed
Fixes I/O error reporting.
PRINT clears I/O error, so we must save it before.
1 parent a4f160a commit 1145a34

1 file changed

Lines changed: 2 additions & 1 deletion

File tree

src/cmdline.bas

Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -39,7 +39,8 @@ NewPtr = 0
3939
' Shows file error
4040
'
4141
PROC FileError
42-
? "FILE ERROR: "; err()
42+
i = err()
43+
? "FILE ERROR: "; i
4344
put $FD
4445
? "Press any key to exit."
4546
close #1

0 commit comments

Comments
 (0)