changeset 46418:b12a32662433

* alloc.c (make_event_array): Use SSET for storing into a string.
author Ken Raeburn <raeburn@raeburn.org>
date Tue, 16 Jul 2002 15:48:47 +0000
parents f498269eec42
children 46ff766afaaf
files src/alloc.c
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/src/alloc.c	Tue Jul 16 15:09:36 2002 +0000
+++ b/src/alloc.c	Tue Jul 16 15:48:47 2002 +0000
@@ -2701,10 +2701,10 @@
     result = Fmake_string (make_number (nargs), make_number (0));
     for (i = 0; i < nargs; i++)
       {
-	SREF (result, i) = XINT (args[i]);
+	SSET (result, i, XINT (args[i]));
 	/* Move the meta bit to the right place for a string char.  */
 	if (XINT (args[i]) & CHAR_META)
-	  SREF (result, i) |= 0x80;
+	  SSET (result, i, SREF (result, i) | 0x80);
       }
     
     return result;