Mercurial > hg > xemacs-beta
changeset 3176:1c2a4e4e81d9
[xemacs-hg @ 2005-12-25 11:21:45 by aidan]
Revert the alloc warning bugfix
author | aidan |
---|---|
date | Sun, 25 Dec 2005 11:21:46 +0000 |
parents | f102dbecac7b |
children | 9ee92e18062b |
files | src/ChangeLog src/alloc.c |
diffstat | 2 files changed, 27 insertions(+), 28 deletions(-) [+] |
line wrap: on
line diff
--- a/src/ChangeLog Sat Dec 24 22:50:54 2005 +0000 +++ b/src/ChangeLog Sun Dec 25 11:21:46 2005 +0000 @@ -1,3 +1,12 @@ +2005-12-25 Aidan Kehoe <kehoea@parhasard.net> + + * alloc.c: + * alloc.c (malloc_warning): + * alloc.c (MALLOC_BEGIN): + * alloc.c (FREE_OR_REALLOC_BEGIN): + Revert the alloc warning bugfix, in response to Stephen's mail + 87acepzl6e.fsf@tleepslib.sk.tsukuba.ac.jp . + 2005-12-24 Aidan Kehoe <kehoea@parhasard.net> * objects-x.c (x_font_instance_truename):
--- a/src/alloc.c Sat Dec 24 22:50:54 2005 +0000 +++ b/src/alloc.c Sun Dec 25 11:21:46 2005 +0000 @@ -231,6 +231,22 @@ } #endif /* not MC_ALLOC */ +/* malloc calls this if it finds we are near exhausting storage */ +void +malloc_warning (const char *str) +{ + if (ignore_malloc_warnings) + return; + + warn_when_safe + (Qmemory, Qemergency, + "%s\n" + "Killing some buffers may delay running out of memory.\n" + "However, certainly by the time you receive the 95%% warning,\n" + "you should clean up, kill this Emacs, and start a new one.", + str); +} + /* Called if malloc returns zero */ DOESNT_RETURN memory_full (void) @@ -274,21 +290,18 @@ } #ifdef ERROR_CHECK_MALLOC -static int in_malloc, in_malloc_warning; +static int in_malloc; extern int regex_malloc_disallowed; #define MALLOC_BEGIN() \ do \ { \ - assert (!in_malloc || in_malloc_warning); \ + assert (!in_malloc); \ assert (!regex_malloc_disallowed); \ in_malloc = 1; \ } \ while (0) -#define MALLOC_WARNING_BEGIN() (++in_malloc_warning) -#define MALLOC_WARNING_END() (--in_malloc_warning) - #ifdef MC_ALLOC #define FREE_OR_REALLOC_BEGIN(block) \ do \ @@ -328,34 +341,11 @@ #else /* ERROR_CHECK_MALLOC */ #define MALLOC_BEGIN() -#define MALLOC_WARNING_BEGIN() -#define MALLOC_WARNING_END() #define FREE_OR_REALLOC_BEGIN(block) #define MALLOC_END() #endif /* ERROR_CHECK_MALLOC */ -/* malloc calls this if it finds we are near exhausting storage */ -void -malloc_warning (const char *str) -{ - if (ignore_malloc_warnings) - return; - - MALLOC_WARNING_BEGIN(); - - warn_when_safe - (Qmemory, Qemergency, - "%s\n" - "Killing some buffers may delay running out of memory.\n" - "However, certainly by the time you receive the 95%% warning,\n" - "you should clean up, kill this Emacs, and start a new one.\n" - "On Unix, look into your resource limits; ulimit -d, especially.", - str); - - MALLOC_WARNING_END(); -} - static void malloc_after (void *val, Bytecount size) {