modify mciout error behavior

mooinglemur · Oct 7, 2023 · 824d460 · 824d460
1 parent 0f86ef1
commit 824d460
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/dos/main.s b/dos/main.s
@@ -555,6 +555,8 @@ dos_macptr:
 ;---------------------------------------------------------------
 dos_mciout:
 	BANKING_START
+	bit cur_context
+	bmi @1
 
 	stz ieee_status
 
@@ -573,4 +575,6 @@ dos_mciout:
 @end:
 	BANKING_END
 	rts
+@1:	sec ; error: unsupported
+	bra @end