osi: fix backspace on serial systems

ivop · Sep 6, 2024 · ca41070 · ca41070
1 parent 5c65e34
commit ca41070
Showing 1 changed file with 9 additions and 0 deletions.
diff --git a/src/arch/osi/serial.S b/src/arch/osi/serial.S
@@ -41,6 +41,15 @@ zproc tty_const
 zendproc
 
 zproc tty_conout
+    cmp #127
+    zif_eq
+        lda #8
+        jsr send
+        lda #' '
+        jsr send
+        lda #8
+    zendif
+send:
     pha
     zrepeat
         lda SERIAL_ACIA_STATUS       ; wait for bit 1 set, TDR empty