error handling

mooinglemur · Oct 7, 2023 · 0f86ef1 · 0f86ef1
1 parent d96217a
commit 0f86ef1
Showing 1 changed file with 11 additions and 0 deletions.
diff --git a/dos/main.s b/dos/main.s
@@ -559,6 +559,17 @@ dos_mciout:
 	stz ieee_status
 
 	jsr file_write_block
+	bcc @end
+
+	phx
+	phy
+	jsr file_close_clr_channel
+	lda #$01 ; write timeout to indicate error
+	tsb ieee_status
+	clc
+	ply
+	plx
+
 @end:
 	BANKING_END
 	rts