X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=src%2Fscheme%2Ftiny-test%2Fao_scheme_os.h;h=17d66ae35864dc587f308e5b2aa0ebf7ea275840;hb=283553f0f118cef1dbcfbf5e86a43575a610d27f;hp=7cfe39817d08153f65ea811f5a0662e3a6db9305;hpb=d8c9024f3829dc3f241b16869f165f3ee01764f3;p=fw%2Faltos

diff --git a/src/scheme/tiny-test/ao_scheme_os.h b/src/scheme/tiny-test/ao_scheme_os.h
index 7cfe3981..17d66ae3 100644
--- a/src/scheme/tiny-test/ao_scheme_os.h
+++ b/src/scheme/tiny-test/ao_scheme_os.h
@@ -22,20 +22,7 @@
 #include <stdlib.h>
 #include <time.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_TOTAL	4096
-#define AO_SCHEME_SAVE		1
-
-extern int ao_scheme_getc(void);
-
-static inline void
-ao_scheme_os_flush() {
-	fflush(stdout);
-}
 
 static inline void
 ao_scheme_abort(void)
@@ -43,12 +30,6 @@ ao_scheme_abort(void)
 	abort();
 }
 
-static inline void
-ao_scheme_os_led(int led)
-{
-	printf("leds set to 0x%x\n", led);
-}
-
 #define AO_SCHEME_JIFFIES_PER_SECOND	100
 
 static inline void