mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-18 03:40:47 -08:00
Code Issues Projects Releases Wiki Activity

* lisp.h (make_gap_1): New prototype.

Browse source 
* buffer.h (GAP_BYTES_DFL, GAP_BYTES_MIN): New macros for the special
gap size values.
* editfns.c (Fbuffer_size): Rename from Fbufsize to fit the common
naming convention.
(syms_of_editfns): Adjust defsubr.  Drop commented-out obsolete code.
* insdel.c (make_gap_larger): Use GAP_BYTES_DFL.
(make_gap_smaller): Use GAP_BYTES_MIN.  Adjust comment.
(make_gap_1): New function to adjust the gap of any buffer.
* coding.c (coding_alloc_by_making_gap): Use it.
* buffer.c (compact_buffer): Likewise.  Use BUF_Z_BYTE, BUF_GAP_SIZE,
GAP_BYTES_DFL and GAP_BYTES_MIN.  Adjust comment.
This commit is contained in:
Dmitry Antipov 2013-01-09 17:50:22 +04:00
parent ccd04887a3
commit eefd727851
7 changed files with 54 additions and 29 deletions
Download patch file Download diff file Expand all files Collapse all files

9
src/coding.c
View file

@ -1049,14 +1049,7 @@ coding_alloc_by_making_gap (struct coding_system *coding,
GPT -= gap_head_used, GPT_BYTE -= gap_head_used;
}
else
{
Lisp_Object this_buffer;
this_buffer = Fcurrent_buffer ();
set_buffer_internal (XBUFFER (coding->dst_object));
make_gap (bytes);
set_buffer_internal (XBUFFER (this_buffer));
}
make_gap_1 (XBUFFER (coding->dst_object), bytes);
}