# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1121232695 0
# Node ID 66b8e5d68b939b24d50ea81ec5a5c359a7850893
# Parent  291a233cbda96dfe37e0f19bd235250f3fbc2383
(Feval, Ffuncall): Use gc_cons_combined_threshold.

diff -r 291a233cbda9 -r 66b8e5d68b93 src/eval.c
--- 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)