Commit 856163db authored by Stefan Monnier's avatar Stefan Monnier
Browse files

(Feval, Ffuncall): Use gc_cons_combined_threshold.

parent 2a7a50ea
......@@ -2093,7 +2093,7 @@ DEFUN ("eval", Feval, Seval, 1, 1, 0,
return form;
QUIT;
if (consing_since_gc > gc_cons_threshold)
if (consing_since_gc > gc_cons_combined_threshold)
{
GCPRO1 (form);
Fgarbage_collect ();
......@@ -2793,7 +2793,7 @@ usage: (funcall FUNCTION &rest ARGUMENTS) */)
register int i;
QUIT;
if (consing_since_gc > gc_cons_threshold)
if (consing_since_gc > gc_cons_combined_threshold)
Fgarbage_collect ();
if (++lisp_eval_depth > max_lisp_eval_depth)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment