Index: emacs/src/eval.c
diff -c emacs/src/eval.c:1.253 emacs/src/eval.c:1.254
*** emacs/src/eval.c:1.253 Thu Jul 21 15:03:38 2005
--- emacs/src/eval.c Sat Jul 23 19:09:09 2005
***************
*** 2094,2100 ****
return form;
QUIT;
! if (consing_since_gc > gc_cons_combined_threshold)
{
GCPRO1 (form);
Fgarbage_collect ();
--- 2094,2101 ----
return form;
QUIT;
! if (consing_since_gc > gc_cons_threshold
! && consing_since_gc > gc_relative_threshold)
{
GCPRO1 (form);
Fgarbage_collect ();
***************
*** 2794,2800 ****
register int i;
QUIT;
! if (consing_since_gc > gc_cons_combined_threshold)
Fgarbage_collect ();
if (++lisp_eval_depth > max_lisp_eval_depth)
--- 2795,2802 ----
register int i;
QUIT;
! if (consing_since_gc > gc_cons_threshold
! && consing_since_gc > gc_relative_threshold)
Fgarbage_collect ();
if (++lisp_eval_depth > max_lisp_eval_depth)
_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs