Commit 684b01ee authored by Gerd Moellmann's avatar Gerd Moellmann
Browse files

(set_buffer_internal_1) [REL_ALLOC_MMAP]: If

buffer's text buffer is null, map new memory.
parent 0a58f946
......@@ -1548,6 +1548,17 @@ set_buffer_internal_1 (b)
register Lisp_Object tail, valcontents;
Lisp_Object tem;
#ifdef REL_ALLOC_MMAP
if (b->text->beg == NULL)
{
BLOCK_INPUT;
BUFFER_REALLOC (BUF_BEG_ADDR (b),
(BUF_Z_BYTE (b) - BUF_BEG_BYTE (b)
+ BUF_GAP_SIZE (b) + 1));
UNBLOCK_INPUT;
}
#endif /* REL_ALLOC_MMAP */
if (current_buffer == b)
return;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment