[Emacs-diffs] Changes to emacs/src/alloc.c

[Andreas Schwab]

Index: emacs/src/alloc.c
diff -c emacs/src/alloc.c:1.256 emacs/src/alloc.c:1.257
*** emacs/src/alloc.c:1.256     Wed Dec  5 16:37:48 2001
--- emacs/src/alloc.c   Fri Dec  7 07:32:21 2001
***************
*** 4012,4018 ****
  inhibit_garbage_collection ()
  {
    int count = specpdl_ptr - specpdl;
!   specbind (Qgc_cons_threshold, make_number (MOST_POSITIVE_FIXNUM));
    return count;
  }
  
--- 4012,4020 ----
  inhibit_garbage_collection ()
  {
    int count = specpdl_ptr - specpdl;
!   int nbits = min (VALBITS, BITS_PER_INT);
! 
!   specbind (Qgc_cons_threshold, make_number (((EMACS_INT) 1 << (nbits - 1)) - 
1));
    return count;
  }