This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
There be no UVdf.
authorJarkko Hietaniemi <jhi@iki.fi>
Sat, 26 Aug 2000 05:03:50 +0000 (05:03 +0000)
committerJarkko Hietaniemi <jhi@iki.fi>
Sat, 26 Aug 2000 05:03:50 +0000 (05:03 +0000)
p4raw-id: //depot/perl@6835

ext/Storable/Storable.xs

index 7f31977..be89224 100644 (file)
@@ -2080,7 +2080,7 @@ static int store_hook(
        sv_seen:
                SvREFCNT_dec(xsv);
                ary[i] = *svh;
        sv_seen:
                SvREFCNT_dec(xsv);
                ary[i] = *svh;
-               TRACEME(("listed object %d at 0x%"UVxf" is tag #%"UVdf,
+               TRACEME(("listed object %d at 0x%"UVxf" is tag #%"UVxf,
                         i-1, PTR2UV(xsv), PTR2UV(*svh)));
        }
 
                         i-1, PTR2UV(xsv), PTR2UV(*svh)));
        }