X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=src%2Ftest%2Fao_lisp_os.h;h=9ff2e1feb71cafb65ce1a8445b3dc49d8be731f8;hb=db12c17e9538bd82f2c2bf21357887ee7d894a1c;hp=19bd4f64df3237b9a593ec1e470d2c037b4e4fe4;hpb=137898e3431d887e75b09d8c1ce57297a1558e43;p=fw%2Faltos diff --git a/src/test/ao_lisp_os.h b/src/test/ao_lisp_os.h index 19bd4f64..9ff2e1fe 100644 --- a/src/test/ao_lisp_os.h +++ b/src/test/ao_lisp_os.h @@ -22,8 +22,17 @@ #include #include +#define AO_LISP_POOL_TOTAL 3072 +#define AO_LISP_SAVE 1 +#define DBG_MEM_STATS 1 + extern int ao_lisp_getc(void); +static inline void +ao_lisp_os_flush() { + fflush(stdout); +} + static inline void ao_lisp_abort(void) { @@ -39,6 +48,8 @@ ao_lisp_os_led(int led) static inline void ao_lisp_os_delay(int delay) { + if (!delay) + return; struct timespec ts = { .tv_sec = delay / 1000, .tv_nsec = (delay % 1000) * 1000000,