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 | |
| parent | 65fb0ad8693407cc9bd114424c1f51b6aa6befc3 (diff) | |
altos/cortexelf-v1: Make lisp compile again
Signed-off-by: Keith Packard <keithp@keithp.com>
Diffstat (limited to 'src')
| -rw-r--r-- | src/cortexelf-v1/Makefile | 1 | ||||
| -rw-r--r-- | src/cortexelf-v1/ao_lisp_os.h | 10 | ||||
| -rw-r--r-- | src/cortexelf-v1/ao_pins.h | 2 | 
3 files changed, 12 insertions, 1 deletions
| diff --git a/src/cortexelf-v1/Makefile b/src/cortexelf-v1/Makefile index 8cc6ce31..be225e57 100644 --- a/src/cortexelf-v1/Makefile +++ b/src/cortexelf-v1/Makefile @@ -82,6 +82,7 @@ ALTOS_SRC = \  	ao_lisp_atom.c \  	ao_lisp_int.c \  	ao_lisp_poly.c \ +	ao_lisp_bool.c \  	ao_lisp_builtin.c \  	ao_lisp_read.c \  	ao_lisp_rep.c \ 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 diff --git a/src/cortexelf-v1/ao_pins.h b/src/cortexelf-v1/ao_pins.h index 258ffe31..c2bbf2d2 100644 --- a/src/cortexelf-v1/ao_pins.h +++ b/src/cortexelf-v1/ao_pins.h @@ -62,6 +62,8 @@  #define USE_SERIAL_2_STDIN	1  #define SERIAL_2_PA2_PA3	0  #define SERIAL_2_PD5_PD6	1 +#define USE_SERIAL_2_FLOW	0 +#define USE_SERIAL_2_SW_FLOW	0  #define HAS_SERIAL_3		0  #define USE_SERIAL_3_STDIN	0 | 
