diff src/doprnt.c @ 14:9ee227acff29 r19-15b90

Import from CVS: tag r19-15b90
author cvs
date Mon, 13 Aug 2007 08:48:42 +0200
parents 376386a54a3c
children 0293115a14e9
line wrap: on
line diff
--- a/src/doprnt.c	Mon Aug 13 08:48:18 2007 +0200
+++ b/src/doprnt.c	Mon Aug 13 08:48:42 2007 +0200
@@ -390,8 +390,8 @@
 
   if (!NILP (format_reloc))
     {
-      format_nonreloc = string_data (XSTRING (format_reloc));
-      format_length = string_length (XSTRING (format_reloc));
+      format_nonreloc = XSTRING_DATA (format_reloc);
+      format_length = XSTRING_LENGTH (format_reloc);
     }
   if (format_length < 0)
     format_length = (Bytecount) strlen ((CONST char *) format_nonreloc);
@@ -419,7 +419,7 @@
 
       /* Copy the text before */
       if (!NILP (format_reloc)) /* refetch in case of GC below */
-	format_nonreloc = string_data (XSTRING (format_reloc));
+	format_nonreloc = XSTRING_DATA (format_reloc);
        doprnt_1 (stream, format_nonreloc + spec->text_before,
 		 spec->text_before_len, 0, -1, 0, 0);