Fix gc with exceptions
This commit is contained in:
+1
-1
@@ -237,7 +237,7 @@ LispVal *make_builtin_function(LispVal *name, LispVal *(*cfunc)(void),
|
||||
// Calling functions
|
||||
static ALWAYS_INLINE LispVal *evaluate_function_arguments(LispVal *args) {
|
||||
LispVal *start = Qnil;
|
||||
LispVal *end;
|
||||
LispVal *end = NULL;
|
||||
DOLIST(arg, args) {
|
||||
if (NILP(start)) {
|
||||
start = CONS(Feval(arg, Vlexical_environment), Qnil);
|
||||
|
||||
Reference in New Issue
Block a user