diff options
| author | Father Chrysostomos <sprout@cpan.org> | 2010-10-28 22:34:10 -0700 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2010-10-29 05:42:37 -0700 |
| commit | 7afc2217360681dc8e7e48a20a57eb14a33d079d (patch) | |
| tree | 686ef51dc32731d2fdb8c804b438dc0726c4efec /dump.c | |
| parent | 3f783763058d08aba0b7beff15293b731b2a8cdc (diff) | |
| download | perl-7afc2217360681dc8e7e48a20a57eb14a33d079d.tar.gz | |
Fix NAMECOUNT output format in dump.c
Remove quotation marks and, as a bonus, eliminate a compiler warning.
Diffstat (limited to 'dump.c')
| -rw-r--r-- | dump.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -1859,8 +1859,8 @@ Perl_do_sv_dump(pTHX_ I32 level, PerlIO *file, SV *sv, I32 nest, I32 maxnest, bo struct mro_meta * const meta = HvAUX(sv)->xhv_mro_meta; if (HvAUX(sv)->xhv_name_count) Perl_dump_indent(aTHX_ - level, file, " NAMECOUNT = \"%d\"\n", - HvAUX(sv)->xhv_name_count + level, file, " NAMECOUNT = %"IVdf"\n", + (IV)HvAUX(sv)->xhv_name_count ); if (HvAUX(sv)->xhv_name && HvENAME_HEK_NN(sv)) { if (HvAUX(sv)->xhv_name_count) { |