From: Keith Packard <keithp@keithp.com>
Date: Mon, 11 Dec 2017 20:09:30 +0000 (-0800)
Subject: On altos, the primitive input function is ao_getchar, not getchar
X-Git-Url: https://git.gag.com/?p=fw%2Fpdclib;a=commitdiff_plain

On altos, the primitive input function is ao_getchar, not getchar

Signed-off-by: Keith Packard <keithp@keithp.com>
---

diff --git a/platform/altos/functions/stdio/fgetc.c b/platform/altos/functions/stdio/fgetc.c
index 65aa4a2..fe2805a 100644
--- a/platform/altos/functions/stdio/fgetc.c
+++ b/platform/altos/functions/stdio/fgetc.c
@@ -10,9 +10,13 @@
 
 #ifndef REGTEST
 
+#undef ao_getchar
+
+extern int ao_getchar(void);
+
 int fgetc( struct _PDCLIB_file_t * stream )
 {
-    return getchar();
+    return ao_getchar();
 }
 
 #endif