diff options
author | Keith Packard <keithp@keithp.com> | 2016-11-15 10:18:12 -0800 |
---|---|---|
committer | Keith Packard <keithp@keithp.com> | 2016-11-17 22:18:39 -0800 |
commit | f3ac87a792527e9b7eb888e0c1f86fe49dc49bbc (patch) | |
tree | 07d17e5934e2a23a524d8a5e005c782b9eefe83a /src/lisp/ao_lisp_builtin.c | |
parent | acfc29f2400cc3c06745edb5ec0c82b82998d3cc (diff) |
altos/lisp: Get lambdakey and nucleo-32 building again
Remove exti from the build list to make things fit.
Signed-off-by: Keith Packard <keithp@keithp.com>
Diffstat (limited to 'src/lisp/ao_lisp_builtin.c')
-rw-r--r-- | src/lisp/ao_lisp_builtin.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/lisp/ao_lisp_builtin.c b/src/lisp/ao_lisp_builtin.c index e4b7ef52..b808cbc5 100644 --- a/src/lisp/ao_lisp_builtin.c +++ b/src/lisp/ao_lisp_builtin.c @@ -106,6 +106,7 @@ static const ao_poly ao_lisp_args_atoms[] = { char * ao_lisp_args_name(uint8_t args) { + args &= AO_LISP_FUNC_MASK; if (args < sizeof ao_lisp_args_atoms / sizeof ao_lisp_args_atoms[0]) return ao_lisp_poly_atom(ao_lisp_args_atoms[args])->name; return "(unknown)"; |