altos/lisp: Switch to scheme formal syntax for varargs

[fw/altos] / src / lisp / ao_lisp.h

diff --git a/src/lisp/ao_lisp.h b/src/lisp/ao_lisp.h
index d32e7dcd8da263f8d96377bd8190ded9469a5b22..b5e03b1ed7c4ee3bf487bd3039ba02ccaa7bb018 100644 (file)
--- a/src/lisp/ao_lisp.h
+++ b/src/lisp/ao_lisp.h
@@ -297,7 +297,6 @@ extern ao_poly                      ao_lisp_v;
 #define AO_LISP_FUNC_LAMBDA    0
 #define AO_LISP_FUNC_NLAMBDA   1
 #define AO_LISP_FUNC_MACRO     2
-#define AO_LISP_FUNC_LEXPR     3
 
 #define AO_LISP_FUNC_FREE_ARGS 0x80
 #define AO_LISP_FUNC_MASK      0x7f
@@ -305,7 +304,6 @@ extern ao_poly                      ao_lisp_v;
 #define AO_LISP_FUNC_F_LAMBDA  (AO_LISP_FUNC_FREE_ARGS | AO_LISP_FUNC_LAMBDA)
 #define AO_LISP_FUNC_F_NLAMBDA (AO_LISP_FUNC_FREE_ARGS | AO_LISP_FUNC_NLAMBDA)
 #define AO_LISP_FUNC_F_MACRO   (AO_LISP_FUNC_FREE_ARGS | AO_LISP_FUNC_MACRO)
-#define AO_LISP_FUNC_F_LEXPR   (AO_LISP_FUNC_FREE_ARGS | AO_LISP_FUNC_LEXPR)
 
 struct ao_lisp_builtin {
        uint8_t         type;