changeset 64271:66b8e5d68b93

(Feval, Ffuncall): Use gc_cons_combined_threshold.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Wed, 13 Jul 2005 05:31:35 +0000
parents 291a233cbda9
children 6d0705a69884
files src/eval.c
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/src/eval.c	Wed Jul 13 05:30:56 2005 +0000
+++ b/src/eval.c	Wed Jul 13 05:31:35 2005 +0000
@@ -2093,7 +2093,7 @@
     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 @@
   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)