summaryrefslogtreecommitdiff
path: root/regexec.c
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2014-06-16 12:09:56 -0400
committerJarkko Hietaniemi <jhi@iki.fi>2014-06-16 19:22:05 -0400
commite8a85d2601cd28a1a2b4d4b569669a444ac12773 (patch)
tree452767d31a191ee1689745bc592ff2c398622034 /regexec.c
parentd6e6386c7743857a2277042f4fefddb4055fe274 (diff)
downloadperl-e8a85d2601cd28a1a2b4d4b569669a444ac12773.tar.gz
Do not printf U32 and I32 (both) as %i.
(Detected in HP-UX.)
Diffstat (limited to 'regexec.c')
-rw-r--r--regexec.c5
1 files changed, 3 insertions, 2 deletions
diff --git a/regexec.c b/regexec.c
index 000653a773..1aafcc70b2 100644
--- a/regexec.c
+++ b/regexec.c
@@ -300,8 +300,9 @@ S_regcppush(pTHX_ const regexp *rex, I32 parenfloor, U32 maxopenparen)
PERL_ARGS_ASSERT_REGCPPUSH;
if (paren_elems_to_push < 0)
- Perl_croak(aTHX_ "panic: paren_elems_to_push, %i < 0, maxopenparen: %i parenfloor: %i REGCP_PAREN_ELEMS: %i",
- paren_elems_to_push, maxopenparen, parenfloor, REGCP_PAREN_ELEMS);
+ Perl_croak(aTHX_ "panic: paren_elems_to_push, %i < 0, maxopenparen: %i parenfloor: %i REGCP_PAREN_ELEMS: %u",
+ (int)paren_elems_to_push, (int)maxopenparen,
+ (int)parenfloor, (unsigned)REGCP_PAREN_ELEMS);
if ((elems_shifted >> SAVE_TIGHT_SHIFT) != total_elems)
Perl_croak(aTHX_ "panic: paren_elems_to_push offset %"UVuf