diff options
author | Keith Packard <keithp@keithp.com> | 2017-11-17 23:28:08 -0800 |
---|---|---|
committer | Keith Packard <keithp@keithp.com> | 2017-11-17 23:28:08 -0800 |
commit | e745229311366a792110d78d8480a2bf83eef9a0 (patch) | |
tree | e2b7fddd618a246be0b25bf1630f433eb156ecdf /src/cortexelf-v1/ao_lisp_os.h | |
parent | 65fb0ad8693407cc9bd114424c1f51b6aa6befc3 (diff) |
altos/cortexelf-v1: Make lisp compile again
Signed-off-by: Keith Packard <keithp@keithp.com>
Diffstat (limited to 'src/cortexelf-v1/ao_lisp_os.h')
-rw-r--r-- | src/cortexelf-v1/ao_lisp_os.h | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/src/cortexelf-v1/ao_lisp_os.h b/src/cortexelf-v1/ao_lisp_os.h index d0c1f7b7..50c9d40f 100644 --- a/src/cortexelf-v1/ao_lisp_os.h +++ b/src/cortexelf-v1/ao_lisp_os.h @@ -56,10 +56,18 @@ ao_lisp_os_led(int led) (void) led; } +#define AO_LISP_JIFFIES_PER_SECOND AO_HERTZ + static inline void ao_lisp_os_delay(int delay) { - ao_delay(AO_MS_TO_TICKS(delay)); + ao_delay(delay); +} + +static inline int +ao_lisp_os_jiffy(void) +{ + return ao_tick_count; } #endif |