X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=src%2Flambdakey-v1.0%2Fao_scheme_os.h;h=8af199c2042d0ec0bd923d4d70791de906523cea;hb=b1f1a4513391aa595eb64552f2aa4cfedd0cc0ff;hp=0d48af3b902cf0efdc5e786160c73e49ad19f3a6;hpb=09ea349f5b37e257e8ca23ead493ba1694395530;p=fw%2Faltos

diff --git a/src/lambdakey-v1.0/ao_scheme_os.h b/src/lambdakey-v1.0/ao_scheme_os.h
index 0d48af3b..8af199c2 100644
--- a/src/lambdakey-v1.0/ao_scheme_os.h
+++ b/src/lambdakey-v1.0/ao_scheme_os.h
@@ -20,12 +20,7 @@
 
 #include "ao.h"
 
-#undef AO_SCHEME_FEATURE_FLOAT
-#undef AO_SCHEME_FEATURE_VECTOR
-#undef AO_SCHEME_FEATURE_QUASI
-#undef AO_SCHEME_FEATURE_BIGINT
-
-#define AO_SCHEME_POOL		4096
+#define AO_SCHEME_POOL		3792
 #define AO_SCHEME_TOKEN_MAX	64
 
 #ifndef __BYTE_ORDER
@@ -35,7 +30,7 @@
 #endif
 
 static inline int
-ao_scheme_getc() {
+_ao_scheme_getc() {
 	static uint8_t	at_eol;
 	int c;
 
@@ -49,11 +44,7 @@ ao_scheme_getc() {
 	return c;
 }
 
-static inline void
-ao_scheme_os_flush(void)
-{
-	flush();
-}
+#define ao_scheme_getc(f) ({ (void) (f); _ao_scheme_getc(); })
 
 static inline void
 ao_scheme_abort(void)
@@ -61,11 +52,13 @@ ao_scheme_abort(void)
 	ao_panic(1);
 }
 
+#ifdef LEDS_AVAILABLE
 static inline void
 ao_scheme_os_led(int led)
 {
 	ao_led_set(led);
 }
+#endif
 
 #define AO_SCHEME_JIFFIES_PER_SECOND	AO_HERTZ