From 2a02969a53bda8057b64a7b97681153409231a0a Mon Sep 17 00:00:00 2001
From: Lance Ward <ljward10@gmail.com>
Date: Tue, 13 Aug 2019 12:03:05 -0500
Subject: [PATCH] Reduce baud rate to 9600 to prevent errors due to Qemu being
 slow

---
 Adam/Net/SnailLib.HC | 2 +-
 Apps/Mfa.HC          | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/Adam/Net/SnailLib.HC b/Adam/Net/SnailLib.HC
index 2fc0579..3e5ef30 100644
--- a/Adam/Net/SnailLib.HC
+++ b/Adam/Net/SnailLib.HC
@@ -56,7 +56,7 @@ static U0 ReadBlock(U8* buf, I64 count) {
 I64 SocketInit() {
   U8 chr;
 
-  snail_comm = CommInit8n1(SNAIL_COM, 115200);
+  snail_comm = CommInit8n1(SNAIL_COM, 9600);
   while (FifoU8Rem(snail_comm->RX_fifo, &chr)) {}
 
   CommPutChar(SNAIL_COM, CMD_HELLO);
diff --git a/Apps/Mfa.HC b/Apps/Mfa.HC
index e3fb0c5..88472a2 100644
--- a/Apps/Mfa.HC
+++ b/Apps/Mfa.HC
@@ -35,7 +35,7 @@ U0 ReadBlk(U8* buf, I64 count) {
 U0 Mfa() {
   U8 command;
 
-  comm = CommInit8n1(MFA_COM, 115200);
+  comm = CommInit8n1(MFA_COM, 9600);
   while (FifoU8Rem(comm->RX_fifo, &command)) {}
 
   "$FG,5$minimalist file access\n"