X-Git-Url: https://git.gag.com/?p=fw%2Faltos;a=blobdiff_plain;f=src%2Flisp%2Fao_lisp_atom.c;h=efa4f6214705d78623e27ad01ba686c9bf1f0e9f;hp=5c6d5a67dc72bac26d4abb1afd14a955e7165136;hb=7da6bfc195fad97e3afc576c609897c131fd4d8c;hpb=137898e3431d887e75b09d8c1ce57297a1558e43 diff --git a/src/lisp/ao_lisp_atom.c b/src/lisp/ao_lisp_atom.c index 5c6d5a67..efa4f621 100644 --- a/src/lisp/ao_lisp_atom.c +++ b/src/lisp/ao_lisp_atom.c @@ -147,7 +147,7 @@ ao_lisp_atom_set(ao_poly atom, ao_poly val) if (ref) *ref = val; else - ao_lisp_frame_global = ao_lisp_frame_add(ao_lisp_frame_global, atom, val); + ao_lisp_frame_add(&ao_lisp_frame_global, atom, val); return val; }