summaryrefslogtreecommitdiff
path: root/src/lisp/ao_lisp_make_const.c
diff options
context:
space:
mode:
authorKeith Packard <keithp@keithp.com>2016-11-18 22:52:10 -0800
committerKeith Packard <keithp@keithp.com>2016-11-18 22:52:10 -0800
commitac9638d1fcb7dc4de6daff44798c3f7c43b0e833 (patch)
treeff75da733b5bb2cf41d904ab0c890a800db2f707 /src/lisp/ao_lisp_make_const.c
parentee6ff123352c9184b239ff890a11d8bfa97c4ffc (diff)
altos/lisp: Add builtin 'collect'
Collect memory, return amount free. Signed-off-by: Keith Packard <keithp@keithp.com>
Diffstat (limited to 'src/lisp/ao_lisp_make_const.c')
-rw-r--r--src/lisp/ao_lisp_make_const.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/lisp/ao_lisp_make_const.c b/src/lisp/ao_lisp_make_const.c
index de9c5725..49f989e6 100644
--- a/src/lisp/ao_lisp_make_const.c
+++ b/src/lisp/ao_lisp_make_const.c
@@ -72,6 +72,7 @@ struct builtin_func funcs[] = {
{ .name = "save", .args = AO_LISP_FUNC_F_LAMBDA, .func = builtin_save },
{ .name = "restore", .args = AO_LISP_FUNC_F_LAMBDA, .func = builtin_restore },
{ .name = "call/cc", .args = AO_LISP_FUNC_F_LAMBDA, .func = builtin_call_cc },
+ { .name = "collect", .args = AO_LISP_FUNC_F_LAMBDA, .func = builtin_collect },
};
#define N_FUNC (sizeof funcs / sizeof funcs[0])