]> git.eshelyaron.com Git - emacs.git/commitdiff
(Feval, Ffuncall): Use gc_cons_combined_threshold.
authorStefan Monnier <monnier@iro.umontreal.ca>
Wed, 13 Jul 2005 05:31:35 +0000 (05:31 +0000)
committerStefan Monnier <monnier@iro.umontreal.ca>
Wed, 13 Jul 2005 05:31:35 +0000 (05:31 +0000)
src/eval.c

index 45effae295ca0638644271c5e86f6a3c88b37fe2..3b4e9fe032498a122711843a8c9416ab82bbbdda 100644 (file)
@@ -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)