From ad8c997f72c95b7351eab4c8ea2ac8c667545e6f Mon Sep 17 00:00:00 2001 From: Dmitry Antipov Date: Wed, 8 Aug 2012 14:23:04 +0400 Subject: Inline functions to examine and change string intervals. * lisp.h (STRING_INTERVALS, STRING_SET_INTERVALS): Remove. (string_get_intervals, string_set_intervals): New function. * alloc.c, buffer.c, editfns.c, fns.c, insdel.c, intervals.c: * lread.c, print.c, textprop.c: Adjust users. --- src/buffer.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/buffer.c') diff --git a/src/buffer.c b/src/buffer.c index ad28b69b972..395ca48680f 100644 --- a/src/buffer.c +++ b/src/buffer.c @@ -384,7 +384,7 @@ even if it is dead. The return value is never nil. */) BVAR (b, zv_marker) = Qnil; name = Fcopy_sequence (buffer_or_name); - STRING_SET_INTERVALS (name, NULL); + string_set_intervals (name, NULL); BVAR (b, name) = name; BVAR (b, undo_list) = (SREF (name, 0) != ' ') ? Qnil : Qt; @@ -589,7 +589,7 @@ CLONE nil means the indirect buffer's state is reset to default values. */) all_buffers = b; name = Fcopy_sequence (name); - STRING_SET_INTERVALS (name, NULL); + string_set_intervals (name, NULL); BVAR (b, name) = name; reset_buffer (b); -- cgit v1.2.3