procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(BYTES_USED): Use uordblks, not arena.

Browse source 
(bytes_used_when_reconsidered): New variable.
(emacs_blocked_free): Set that.
This commit is contained in:
Richard M. Stallman 2005-10-30 07:36:35 +00:00
parent 932dc33baf
commit 4d74a5fc8e
2 changed files with 12 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
src/ChangeLog
View file

@ -1,9 +1,17 @@
2005-10-30 Richard M. Stallman <rms@gnu.org>
* alloc.c (BYTES_USED): Use uordblks, not arena.
(bytes_used_when_reconsidered): New variable.
(emacs_blocked_free): Set that.
2005-10-29 Chong Yidong <cyd@stupidchicken.com>
* alloc.c (emacs_blocked_free): Fix typo.
2005-10-29 Richard M. Stallman <rms@gnu.org>
* data.c (Fmake_variable_frame_local): Doc fix.
* xdisp.c (handle_fontified_prop): Do nothing if memory full.
(format_mode_line_unwind_data): New arg SAVE_PROPTRANS
controls whether to save and restore mode_line_proptrans_alist.

6
src/alloc.c
View file

@ -138,6 +138,8 @@ static pthread_mutex_t alloc_mutex;
static __malloc_size_t bytes_used_when_full;
static __malloc_size_t bytes_used_when_reconsidered;
/* Mark, unmark, query mark bit of a Lisp string. S must be a pointer
to a struct Lisp_String. */
@ -521,7 +523,7 @@ display_malloc_warning ()
#ifdef DOUG_LEA_MALLOC
# define BYTES_USED (mallinfo ().arena)
# define BYTES_USED (mallinfo ().uordblks)
#else
# define BYTES_USED _bytes_used
#endif
@ -1179,7 +1181,7 @@ emacs_blocked_free (ptr, ptr2)
The code here is correct as long as SPARE_MEMORY
is substantially larger than the block size malloc uses. */
&& (bytes_used_when_full
> ((bytes_used_now = BYTES_USED)
> ((bytes_used_when_reconsidered = BYTES_USED)
+ max (malloc_hysteresis, 4) * SPARE_MEMORY)))
refill_memory_reserve ();