# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 906783648 0
# Node ID df3f641c9ca1c6b38899d2b1e2a051794b4e8508
# Parent  bbd06336cd0c44b8a37da369ca9c615ca9c62753
(Fformat): Check format control characters.

diff -r bbd06336cd0c -r df3f641c9ca1 src/editfns.c
--- a/src/editfns.c	Sat Sep 26 04:20:48 1998 +0000
+++ b/src/editfns.c	Sat Sep 26 04:20:48 1998 +0000
@@ -2551,7 +2551,12 @@
 	       be a double.  */
 	    if (*format == 'e' || *format == 'f' || *format == 'g')
 	      args[n] = Ffloat (args[n]);
+	    else
 #endif
+	      if (*format != 'd' && *format != 'o' && *format != 'x'
+		  && *format != 'X' && *format != 'c')
+		error ("Invalid format operation %%%c", *format);
+
 	    thissize = 30;	
 	    if (*format == 'c'
 		&& (! SINGLE_BYTE_CHAR_P (XINT (args[n]))