diff options
| author | Jan Djärv <jan.h.d@swipnet.se> | 2005-04-02 12:05:38 +0000 |
|---|---|---|
| committer | Jan Djärv <jan.h.d@swipnet.se> | 2005-04-02 12:05:38 +0000 |
| commit | 1673df2e0d9f5c62211b6a9c89b6886ca288bde8 (patch) | |
| tree | a60f67887e6c5112d2f6fdff1cff2791c3d486b8 /src/alloc.c | |
| parent | 2f2e23735660707d2fae26b2c596ebe1c45b69b8 (diff) | |
| download | emacs-1673df2e0d9f5c62211b6a9c89b6886ca288bde8.tar.gz | |
* alloc.c (allocate_string_data): Call BLOCK_INPUT before calling
mallopt.
* ralloc.c (r_alloc_init): Ditto.
Diffstat (limited to 'src/alloc.c')
| -rw-r--r-- | src/alloc.c | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/alloc.c b/src/alloc.c index d529ab9927b..a907247d21c 100644 --- a/src/alloc.c +++ b/src/alloc.c @@ -1933,14 +1933,18 @@ allocate_string_data (s, nchars, nbytes) mmap'ed data typically have an address towards the top of the address space, which won't fit into an EMACS_INT (at least on 32-bit systems with the current tagging scheme). --fx */ + BLOCK_INPUT; mallopt (M_MMAP_MAX, 0); + UNBLOCK_INPUT; #endif b = (struct sblock *) lisp_malloc (size + GC_STRING_EXTRA, MEM_TYPE_NON_LISP); #ifdef DOUG_LEA_MALLOC /* Back to a reasonable maximum of mmap'ed areas. */ + BLOCK_INPUT; mallopt (M_MMAP_MAX, MMAP_MAX_AREAS); + UNBLOCK_INPUT; #endif b->next_free = &b->first_data; |