altos/lisp: Add save/restore infrastructure. Needs OS support to work.

[fw/altos] / src / lisp / ao_lisp_builtin.c

diff --git a/src/lisp/ao_lisp_builtin.c b/src/lisp/ao_lisp_builtin.c
index 30631980500df974f6a6a9cb4a58f469c5f3a072..ebc69f7759ec0d348f427c2480b3682170173061 100644 (file)
--- a/src/lisp/ao_lisp_builtin.c
+++ b/src/lisp/ao_lisp_builtin.c
@@ -82,6 +82,9 @@ static const ao_poly builtin_names[] = {
        [builtin_flush] = _ao_lisp_atom_flush,
        [builtin_delay] = _ao_lisp_atom_delay,
        [builtin_led] = _ao_lisp_atom_led,
+       [builtin_save] = _ao_lisp_atom_save,
+       [builtin_restore] = _ao_lisp_atom_restore,
+
 };
 
 static char *
@@ -591,5 +594,7 @@ const ao_lisp_func_t ao_lisp_builtins[] = {
        [builtin_flush] = ao_lisp_flush,
        [builtin_led] = ao_lisp_led,
        [builtin_delay] = ao_lisp_delay,
+       [builtin_save] = ao_lisp_save,
+       [builtin_restore] = ao_lisp_restore,
 };