This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
printf type-matching continues. again.
authorJarkko Hietaniemi <jhi@iki.fi>
Fri, 5 Dec 2014 02:23:59 +0000 (21:23 -0500)
committerJarkko Hietaniemi <jhi@iki.fi>
Sat, 6 Dec 2014 00:48:03 +0000 (19:48 -0500)
dump.c

diff --git a/dump.c b/dump.c
index cc8ff70..cb14f43 100644 (file)
--- a/dump.c
+++ b/dump.c
@@ -993,7 +993,7 @@ Perl_do_op_dump(pTHX_ I32 level, PerlIO *file, const OP *o)
                                       (label_flags & SVf_UTF8)));
    }
         Perl_dump_indent(aTHX_ level, file, "SEQ = %u\n",
-                                             cCOPo->cop_seq);
+                         (unsigned int)cCOPo->cop_seq);
        break;
     case OP_ENTERLOOP:
        Perl_dump_indent(aTHX_ level, file, "REDO ===> ");