diff options
| -rw-r--r-- | src/buffer.c | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/src/buffer.c b/src/buffer.c index 5c5c2e05b25..a839b1e97a9 100644 --- a/src/buffer.c +++ b/src/buffer.c | |||
| @@ -1548,6 +1548,17 @@ set_buffer_internal_1 (b) | |||
| 1548 | register Lisp_Object tail, valcontents; | 1548 | register Lisp_Object tail, valcontents; |
| 1549 | Lisp_Object tem; | 1549 | Lisp_Object tem; |
| 1550 | 1550 | ||
| 1551 | #ifdef REL_ALLOC_MMAP | ||
| 1552 | if (b->text->beg == NULL) | ||
| 1553 | { | ||
| 1554 | BLOCK_INPUT; | ||
| 1555 | BUFFER_REALLOC (BUF_BEG_ADDR (b), | ||
| 1556 | (BUF_Z_BYTE (b) - BUF_BEG_BYTE (b) | ||
| 1557 | + BUF_GAP_SIZE (b) + 1)); | ||
| 1558 | UNBLOCK_INPUT; | ||
| 1559 | } | ||
| 1560 | #endif /* REL_ALLOC_MMAP */ | ||
| 1561 | |||
| 1551 | if (current_buffer == b) | 1562 | if (current_buffer == b) |
| 1552 | return; | 1563 | return; |
| 1553 | 1564 | ||