* intervals.c (create_root_interval, balance_possible_root_interval,

delete_interval, copy_intervals_to_string): Use STRING_SET_INTERVALS.

1 files changed, 4 insertions, 4 deletions

diff --git a/src/intervals.c b/src/intervals.c
index 0129faa7877..9ed2a651f55 100644
--- a/src/intervals.c
+++ b/src/intervals.c
@@ -81,7 +81,7 @@ create_root_interval (parent)
   else if (STRINGP (parent))
     {
       new->total_length = SCHARS (parent);
-      STRING_INTERVALS (parent) = new;
+      STRING_SET_INTERVALS (parent, new);
       new->position = 0;
     }
 
@@ -452,7 +452,7 @@ balance_possible_root_interval (interval)
       if (BUFFERP (parent))
         BUF_INTERVALS (XBUFFER (parent)) = interval;
       else if (STRINGP (parent))
-        STRING_INTERVALS (parent) = interval;
+        STRING_SET_INTERVALS (parent, interval);
     }
 
   return interval;
@@ -1280,7 +1280,7 @@ delete_interval (i)
       if (BUFFERP (owner))
         BUF_INTERVALS (XBUFFER (owner)) = parent;
       else if (STRINGP (owner))
-        STRING_INTERVALS (owner) = parent;
+        STRING_SET_INTERVALS (owner, parent);
       else
         abort ();
 
@@ -2384,7 +2384,7 @@ copy_intervals_to_string (string, buffer, position, length)
     return;
 
   SET_INTERVAL_OBJECT (interval_copy, string);
-  STRING_INTERVALS (string) = interval_copy;
+  STRING_SET_INTERVALS (string, interval_copy);
 }
 
 /* Return 1 if strings S1 and S2 have identical properties; 0 otherwise.