From 343c38132359f7ca525f1c2527792dfc0ffda2d3 Mon Sep 17 00:00:00 2001
From: crc <crc@noemail.net>
Date: Wed, 31 Jan 2018 04:21:16 +0000
Subject: [PATCH] experimental: start tie in of retro9 i/o code to
 putchar/getchar stubs

FossilOrigin-Name: f656e5d148998902ce7693bcbdd89d1bc9ab1b2960f1f2ecfaef4d2b73968c20
---
 experimental/386.s | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

diff --git a/experimental/386.s b/experimental/386.s
index 596d2d7..859de1d 100644
--- a/experimental/386.s
+++ b/experimental/386.s
@@ -54,10 +54,16 @@ _start:
 
 align 4
 putchar:
+	mov eax, [esp-4]
+	call vEmit
 	ret
 
 align 4
 getchar:
+	call key
+	push eax
+	call vEmit
+	pop eax
 	ret
 
 section .text
@@ -82,9 +88,6 @@ key:
         jz .a                   ;  Ignore 0's
         or dl,dl                        ;  Filter for break code
         jnz .a                  ;  Ignore break code
-;        dup
-;        call sys_emit
-;          ret
   jmp .done
 .shift:  mov ecx,[edx*4 + .shifts]       ;  Load the CAPITAL keymap
         mov [board],ecx                 ;  Store into BOARD pointer