altos/lisp: Evaluate macros once, then smash them into place

[fw/altos] / src / lisp / ao_lisp_os.h

diff --git a/src/lisp/ao_lisp_os.h b/src/lisp/ao_lisp_os.h
index 55ffed50361cf6a31cd33e9712f43e1bd301f62b..5fa3686b70ee5aaa9cc801eb2104cebcedf5f996 100644 (file)
--- a/src/lisp/ao_lisp_os.h
+++ b/src/lisp/ao_lisp_os.h
@@ -22,9 +22,11 @@
 #include <stdlib.h>
 #include <time.h>
 
-static inline int
-ao_lisp_getc() {
-       return getchar();
+extern int ao_lisp_getc(void);
+
+static inline void
+ao_lisp_os_flush(void) {
+       fflush(stdout);
 }
 
 static inline void