* ch-exp.y (match_string_literal): Allow a zero-length string.

* ch-lang.c (chill_printstr):  Don't print zero-length string funny.

gdb/ChangeLog

@@ -1,3 +1,8 @@
+Fri Jan 21 19:10:44 1994  Per Bothner  (bothner@kalessin.cygnus.com)
+
+	* ch-exp.y (match_string_literal):  Allow a zero-length string.
+	* ch-lang.c (chill_printstr):  Don't print zero-length string funny.
+
 Sat Jan 22 17:08:48 1994  Jim Kingdon  (kingdon@lioth.cygnus.com)
 
 	* i386aix-nat.c (i386_float_info): Reverse order of registers before

gdb/ch-exp.y

@@ -1335,7 +1335,7 @@ match_float_literal ()
   return (0);
 }
 
-/* Recognize a string literal.  A string literal is a nonzero sequence
+/* Recognize a string literal.  A string literal is a sequence
    of characters enclosed in matching single or double quotes, except that
    a single character inside single quotes is a character literal, which
    we reject as a string literal.  To embed the terminator character inside
@@ -1363,7 +1363,6 @@ match_string_literal ()
       tempbuf[tempbufindex++] = *tokptr;
     }
   if (*tokptr == '\0'					/* no terminator */
-      || tempbufindex == 0				/* no string */
       || (tempbufindex == 1 && *tokptr == '\''))	/* char literal */
     {
       return (0);
@@ -1806,7 +1805,7 @@ yylex ()
       {
 	case '\'':
 	case '\"':
-	  /* First try to match a string literal, which is any nonzero
+	  /* First try to match a string literal, which is any
 	     sequence of characters enclosed in matching single or double
 	     quotes, except that a single character inside single quotes
 	     is a character literal, so we have to catch that case also. */

gdb/ch-lang.c

@@ -95,7 +95,7 @@ chill_printstr (stream, string, length, force_ellipses)
 
   if (length == 0)
     {
-      chill_printchar ('\0', stream);
+      fputs_filtered ("\"\"", stream);
       return;
     }