From: Bruno Haible <bruno@clisp.org>
Date: Mon, 23 Jun 2003 09:51:43 +0000 (+0000)
Subject: Nop.
X-Git-Tag: v0.13~420
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=8a339a076c19ae748940de161f468ac1c17e4502;p=thirdparty%2Fgettext.git

Nop.
---

diff --git a/gettext-tools/src/x-perl.c b/gettext-tools/src/x-perl.c
index 7e89b7d3e..b9d9c08b6 100644
--- a/gettext-tools/src/x-perl.c
+++ b/gettext-tools/src/x-perl.c
@@ -2022,10 +2022,12 @@ x_perl_prelex (message_list_ty *mlp, token_ty *tp)
 		case 'w':
 		  tp->type = token_type_symbol;
 		  break;
-		default: /* q\000 */
+		case '\0':
 		  tp->type = token_type_string;
 		  tp->string_type = string_type_q;
 		  break;
+		default:
+		  abort ();
 		}
 	      return;
 	    }