diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2014-06-16 12:09:56 -0400 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2014-06-16 19:22:05 -0400 |
commit | e8a85d2601cd28a1a2b4d4b569669a444ac12773 (patch) | |
tree | 452767d31a191ee1689745bc592ff2c398622034 /regexec.c | |
parent | d6e6386c7743857a2277042f4fefddb4055fe274 (diff) | |
download | perl-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.c | 5 |
1 files changed, 3 insertions, 2 deletions
@@ -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 |