aboutsummaryrefslogtreecommitdiffstats
path: root/src/insdel.c
diff options
context:
space:
mode:
authorPaul Eggert2012-08-17 14:12:11 -0700
committerPaul Eggert2012-08-17 14:12:11 -0700
commit0c94c8d603031f6b665ae7f3136ca77fb573fd7e (patch)
treefabdd332bf09c4ea02198aa36a6a7bdab7e43397 /src/insdel.c
parentee21815118944347ad0c45d47af651e7283709d2 (diff)
downloademacs-0c94c8d603031f6b665ae7f3136ca77fb573fd7e.tar.gz
emacs-0c94c8d603031f6b665ae7f3136ca77fb573fd7e.zip
A few more naming-convention fixes for getters and setters.
* buffer.c (set_buffer_overlays_before): Move here from buffer.h, and rename from buffer_overlays_set_before. (set_buffer_overlays_after): Move here from buffer.h, and rename from buffer_overlays_set_after. * buffer.h (buffer_intervals): Rename from buffer_get_intervals. All uses changed. (set_buffer_intervals): Rename from buffer_set_intervals. * intervals.c (set_interval_object): Move here from intervals.h, and rename from interval_set_object. (set_interval_left): Move here from intervals.h, and rename from interval_set_left. (set_interval_right): Move here from intervals.h, and rename from interval_set_right. (copy_interval_parent): Move here from intervals.h, and rename from interval_copy_parent. * intervals.h (set_interval_parent): Rename from interval_set_parent. (set_interval_plist): Rename from interval_set_plist. Return void, not Lisp_Object, since no caller uses the result. * lisp.h (string_intervals): Rename from string_get_intervals. (set_string_intervals): Rename from string_set_intervals.
Diffstat (limited to 'src/insdel.c')
-rw-r--r--src/insdel.c18
1 files changed, 9 insertions, 9 deletions
diff --git a/src/insdel.c b/src/insdel.c
index 14d2dab084d..fe10879b9f8 100644
--- a/src/insdel.c
+++ b/src/insdel.c
@@ -844,10 +844,10 @@ insert_1_both (const char *string,
844 PT + nchars, PT_BYTE + nbytes, 844 PT + nchars, PT_BYTE + nbytes,
845 before_markers); 845 before_markers);
846 846
847 if (buffer_get_intervals (current_buffer)) 847 if (buffer_intervals (current_buffer))
848 offset_intervals (current_buffer, PT, nchars); 848 offset_intervals (current_buffer, PT, nchars);
849 849
850 if (!inherit && buffer_get_intervals (current_buffer)) 850 if (!inherit && buffer_intervals (current_buffer))
851 set_text_properties (make_number (PT), make_number (PT + nchars), 851 set_text_properties (make_number (PT), make_number (PT + nchars),
852 Qnil, Qnil, Qnil); 852 Qnil, Qnil, Qnil);
853 853
@@ -976,7 +976,7 @@ insert_from_string_1 (Lisp_Object string, ptrdiff_t pos, ptrdiff_t pos_byte,
976 976
977 offset_intervals (current_buffer, PT, nchars); 977 offset_intervals (current_buffer, PT, nchars);
978 978
979 intervals = string_get_intervals (string); 979 intervals = string_intervals (string);
980 /* Get the intervals for the part of the string we are inserting. */ 980 /* Get the intervals for the part of the string we are inserting. */
981 if (nbytes < SBYTES (string)) 981 if (nbytes < SBYTES (string))
982 intervals = copy_intervals (intervals, pos, nchars); 982 intervals = copy_intervals (intervals, pos, nchars);
@@ -1017,7 +1017,7 @@ insert_from_gap (ptrdiff_t nchars, ptrdiff_t nbytes)
1017 adjust_markers_for_insert (GPT - nchars, GPT_BYTE - nbytes, 1017 adjust_markers_for_insert (GPT - nchars, GPT_BYTE - nbytes,
1018 GPT, GPT_BYTE, 0); 1018 GPT, GPT_BYTE, 0);
1019 1019
1020 if (buffer_get_intervals (current_buffer)) 1020 if (buffer_intervals (current_buffer))
1021 { 1021 {
1022 offset_intervals (current_buffer, GPT - nchars, nchars); 1022 offset_intervals (current_buffer, GPT - nchars, nchars);
1023 graft_intervals_into_buffer (NULL, GPT - nchars, nchars, 1023 graft_intervals_into_buffer (NULL, GPT - nchars, nchars,
@@ -1157,11 +1157,11 @@ insert_from_buffer_1 (struct buffer *buf,
1157 PT_BYTE + outgoing_nbytes, 1157 PT_BYTE + outgoing_nbytes,
1158 0); 1158 0);
1159 1159
1160 if (buffer_get_intervals (current_buffer)) 1160 if (buffer_intervals (current_buffer))
1161 offset_intervals (current_buffer, PT, nchars); 1161 offset_intervals (current_buffer, PT, nchars);
1162 1162
1163 /* Get the intervals for the part of the string we are inserting. */ 1163 /* Get the intervals for the part of the string we are inserting. */
1164 intervals = buffer_get_intervals (buf); 1164 intervals = buffer_intervals (buf);
1165 if (nchars < BUF_Z (buf) - BUF_BEG (buf)) 1165 if (nchars < BUF_Z (buf) - BUF_BEG (buf))
1166 { 1166 {
1167 if (buf == current_buffer && PT <= from) 1167 if (buf == current_buffer && PT <= from)
@@ -1226,7 +1226,7 @@ adjust_after_replace (ptrdiff_t from, ptrdiff_t from_byte,
1226 else if (len < nchars_del) 1226 else if (len < nchars_del)
1227 adjust_overlays_for_delete (from, nchars_del - len); 1227 adjust_overlays_for_delete (from, nchars_del - len);
1228 1228
1229 if (buffer_get_intervals (current_buffer)) 1229 if (buffer_intervals (current_buffer))
1230 offset_intervals (current_buffer, from, len - nchars_del); 1230 offset_intervals (current_buffer, from, len - nchars_del);
1231 1231
1232 if (from < PT) 1232 if (from < PT)
@@ -1412,7 +1412,7 @@ replace_range (ptrdiff_t from, ptrdiff_t to, Lisp_Object new,
1412 1412
1413 /* Get the intervals for the part of the string we are inserting-- 1413 /* Get the intervals for the part of the string we are inserting--
1414 not including the combined-before bytes. */ 1414 not including the combined-before bytes. */
1415 intervals = string_get_intervals (new); 1415 intervals = string_intervals (new);
1416 /* Insert those intervals. */ 1416 /* Insert those intervals. */
1417 graft_intervals_into_buffer (intervals, from, inschars, 1417 graft_intervals_into_buffer (intervals, from, inschars,
1418 current_buffer, inherit); 1418 current_buffer, inherit);
@@ -1822,7 +1822,7 @@ prepare_to_modify_buffer (ptrdiff_t start, ptrdiff_t end,
1822 if (XBUFFER (XWINDOW (selected_window)->buffer) != current_buffer) 1822 if (XBUFFER (XWINDOW (selected_window)->buffer) != current_buffer)
1823 ++windows_or_buffers_changed; 1823 ++windows_or_buffers_changed;
1824 1824
1825 if (buffer_get_intervals (current_buffer)) 1825 if (buffer_intervals (current_buffer))
1826 { 1826 {
1827 if (preserve_ptr) 1827 if (preserve_ptr)
1828 { 1828 {