diff options
author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2002-03-30 22:36:23 +0100 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-03-30 23:19:59 +0000 |
commit | 2a4859cd23ed6ee8a63ab2b368aa795a8bc11a56 (patch) | |
tree | 77f53d8e214364b9575fbd1cb58126b4402c94f1 /regcomp.c | |
parent | 0dfa044182f5a9f8cf8f995c4c0c315ce3198e94 (diff) | |
download | perl-2a4859cd23ed6ee8a63ab2b368aa795a8bc11a56.tar.gz |
Re: 64 bit SEGV in t/op/regmesg.t
Message-ID: <20020330213623.A677@rafael>
p4raw-id: //depot/perl@15628
Diffstat (limited to 'regcomp.c')
-rw-r--r-- | regcomp.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -3597,7 +3597,7 @@ S_regclass(pTHX_ RExC_state_t *pRExC_state) case 'p': case 'P': if (RExC_parse >= RExC_end) - vFAIL2("Empty \\%c{}", value); + vFAIL2("Empty \\%c{}", (U8)value); if (*RExC_parse == '{') { U8 c = (U8)value; e = strchr(RExC_parse++, '}'); |