From: Gisle Aas <gisle@aas.no>
Date: Wed, 14 Oct 1998 15:17:44 +0000 (+0200)
Subject: Core dump from "Missing right brace on \x{}"
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=adaeee4954d8cb3ae8468dc301a3a7f6315c644d;p=p5sagit%2Fp5-mst-13.2.git

Core dump from "Missing right brace on \x{}"

	Message-ID: <m3iuhn9taf.fsf@furu.g.aas.no>

p4raw-id: //depot/perl@2001
---

diff --git a/toke.c b/toke.c
index 88933de..8664b8f 100644
--- a/toke.c
+++ b/toke.c
@@ -1076,8 +1076,10 @@ scan_const(char *start)
 		if (*s == '{') {
 		    char* e = strchr(s, '}');
 
-		    if (!e)
+		    if (!e) {
 			yyerror("Missing right brace on \\x{}");
+			e = s;
+		    }
 		    if (!utf) {
 			dTHR;
 			if (ckWARN(WARN_UTF8))