From: Rafael Garcia-Suarez <rgarciasuarez@gmail.com>
Date: Wed, 27 Mar 2002 13:48:06 +0000 (+0100)
Subject: Re: Regex-Unicode bugs
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=eac43e50eb74b2ab842edbaf11e066023abc47dc;p=p5sagit%2Fp5-mst-13.2.git

Re: Regex-Unicode bugs
Message-ID: <20020327134806.C18945@rafael>

regmesg.t patch still would be nice.

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

diff --git a/regcomp.c b/regcomp.c
index c124d48..14a2450 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -3597,7 +3597,7 @@ S_regclass(pTHX_ RExC_state_t *pRExC_state)
 	    case 'p':
 	    case 'P':
 		if (RExC_parse >= RExC_end)
-		    vFAIL("Empty \\p{}");
+		    vFAIL2("Empty \\%c{}", value);
 		if (*RExC_parse == '{') {
 		    U8 c = (U8)value;
 		    e = strchr(RExC_parse++, '}');