diff src/editfns.c @ 23197:0d3baa5514b7

(Fformat): Detect incomplete format spec at string's end.
author Karl Heuer <kwzh@gnu.org>
date Sun, 06 Sep 1998 14:40:21 +0000
parents 6072f28afec9
children dddce768cf7a
line wrap: on
line diff
--- a/src/editfns.c	Sun Sep 06 14:31:49 1998 +0000
+++ b/src/editfns.c	Sun Sep 06 14:40:21 1998 +0000
@@ -2447,6 +2447,8 @@
 	if (format - this_format_start + 1 > longest_format)
 	  longest_format = format - this_format_start + 1;
 
+	if (format == end)
+	  error ("Format string ends in middle of format specifier");
 	if (*format == '%')
 	  format++;
 	else if (++n >= nargs)
@@ -2478,7 +2480,7 @@
 	  {
 	  string:
 	    if (*format != 's' && *format != 'S')
-	      error ("format specifier doesn't match argument type");
+	      error ("Format specifier doesn't match argument type");
 	    thissize = CONVERTED_BYTE_SIZE (multibyte, args[n]);
 	  }
 	/* Would get MPV otherwise, since Lisp_Int's `point' to low memory.  */