X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=src%2Flisp%2Fao_lisp_eval.c;fp=src%2Flisp%2Fao_lisp_eval.c;h=02329ee62be8f9e73597a3c2a5bc29305a2ae4fb;hb=c31744299e5a4342bbe26d3735ee2d8f09192ae9;hp=fa25edf02f1bc39f3001c9c0a50f2fc8dbc20241;hpb=98923ae1189f062b8b94120d47a56892db25493f;p=fw%2Faltos

diff --git a/src/lisp/ao_lisp_eval.c b/src/lisp/ao_lisp_eval.c
index fa25edf0..02329ee6 100644
--- a/src/lisp/ao_lisp_eval.c
+++ b/src/lisp/ao_lisp_eval.c
@@ -559,6 +559,8 @@ ao_lisp_eval(ao_poly _v)
 {
 	ao_lisp_v = _v;
 
+	ao_lisp_frame_init();
+
 	if (!ao_lisp_stack_push())
 		return AO_LISP_NIL;