In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/bc6e9114608594d13b642d1fabbb914619905672?hp=f6166f76b7f5b59becd71ea9d8f959a789ee70f8>
- Log ----------------------------------------------------------------- commit bc6e9114608594d13b642d1fabbb914619905672 Author: Chip Salzenberg <c...@pobox.com> Date: Fri Dec 17 11:21:54 2010 -0800 update warnings tests to cope with %z now being valid. use %y instead ----------------------------------------------------------------------- Summary of changes: t/lib/warnings/sv | 48 ++++++++++++++++++++++++------------------------ 1 files changed, 24 insertions(+), 24 deletions(-) diff --git a/t/lib/warnings/sv b/t/lib/warnings/sv index e29553a..f7c2e63 100644 --- a/t/lib/warnings/sv +++ b/t/lib/warnings/sv @@ -292,52 +292,52 @@ Subroutine main::fred redefined at - line 5. # sv.c use warnings 'printf' ; open F, ">".($^O eq 'VMS'? 'NL:' : '/dev/null') ; -printf F "%z\n" ; -my $a = sprintf "%z" ; +printf F "%y\n" ; +my $a = sprintf "%y" ; printf F "%" ; $a = sprintf "%" ; printf F "%\x02" ; $a = sprintf "%\x02" ; -printf F "%llz" ; -$a = sprintf "%llz" ; -printf F "%25llz" ; -$a = sprintf "%25llz" ; -printf F "%+2Lz" ; -$a = sprintf "%+2Lz" ; +printf F "%lly" ; +$a = sprintf "%lly" ; +printf F "%25lly" ; +$a = sprintf "%25lly" ; +printf F "%+2Ly" ; +$a = sprintf "%+2Ly" ; printf F "%+2ll" ; $a = sprintf "%+2ll" ; printf F "%+2L\x03" ; $a = sprintf "%+2L\x03" ; no warnings 'printf' ; -printf F "%z\n" ; -$a = sprintf "%z" ; +printf F "%y\n" ; +$a = sprintf "%y" ; printf F "%" ; $a = sprintf "%" ; printf F "%\x02" ; $a = sprintf "%\x02" ; -printf F "%llz" ; -$a = sprintf "%llz" ; -printf F "%25llz" ; -$a = sprintf "%25llz" ; -printf F "%+2Lz" ; -$a = sprintf "%+2Lz" ; +printf F "%lly" ; +$a = sprintf "%lly" ; +printf F "%25lly" ; +$a = sprintf "%25lly" ; +printf F "%+2Ly" ; +$a = sprintf "%+2Ly" ; printf F "%+2ll" ; $a = sprintf "%+2ll" ; printf F "%+2L\x03" ; $a = sprintf "%+2L\x03" ; EXPECT -Invalid conversion in printf: "%z" at - line 4. -Invalid conversion in sprintf: "%z" at - line 5. +Invalid conversion in printf: "%y" at - line 4. +Invalid conversion in sprintf: "%y" at - line 5. Invalid conversion in printf: end of string at - line 6. Invalid conversion in sprintf: end of string at - line 7. Invalid conversion in printf: "%\002" at - line 8. Invalid conversion in sprintf: "%\002" at - line 9. -Invalid conversion in printf: "%llz" at - line 10. -Invalid conversion in sprintf: "%llz" at - line 11. -Invalid conversion in printf: "%25llz" at - line 12. -Invalid conversion in sprintf: "%25llz" at - line 13. -Invalid conversion in printf: "%+2Lz" at - line 14. -Invalid conversion in sprintf: "%+2Lz" at - line 15. +Invalid conversion in printf: "%lly" at - line 10. +Invalid conversion in sprintf: "%lly" at - line 11. +Invalid conversion in printf: "%25lly" at - line 12. +Invalid conversion in sprintf: "%25lly" at - line 13. +Invalid conversion in printf: "%+2Ly" at - line 14. +Invalid conversion in sprintf: "%+2Ly" at - line 15. Invalid conversion in printf: "%+2ll" at - line 16. Invalid conversion in sprintf: "%+2ll" at - line 17. Invalid conversion in printf: "%+2L\003" at - line 18. -- Perl5 Master Repository