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.

1 files changed, 1 insertions, 1 deletions

diff --git a/src/alloc.c b/src/alloc.c
index d342a722ca6..95309f076d4 100644
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -6102,7 +6102,7 @@ mark_object (Lisp_Object arg)
           }
         if (!PURE_POINTER_P (XSTRING (ptr->name)))
           MARK_STRING (XSTRING (ptr->name));
-        MARK_INTERVAL_TREE (STRING_INTERVALS (ptr->name));
+        MARK_INTERVAL_TREE (string_get_intervals (ptr->name));
 
         ptr = ptr->next;
         if (ptr)