This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Add supplied tests from perl #83194.
authorHugo van der Sanden <hv@crypt.org>
Sun, 6 Feb 2011 11:28:01 +0000 (11:28 +0000)
committerFather Chrysostomos <sprout@cpan.org>
Tue, 8 Feb 2011 05:28:57 +0000 (21:28 -0800)
Supplies two known failures for sprintf '%v.*x'.

t/op/sprintf.t

index 75f5177..57eac07 100644 (file)
@@ -702,3 +702,11 @@ __END__
 >%#x<          >0<     >0<
 >%2147483647$v2d<      >''<    ><
 >%*2147483647$v2d<     >''<    > MISSING<
+>%.3X<         >[11]<                  >00B<           >perl #83194: hex, zero-padded to 3 places<
+>%.*X<         >[3, 11]<               >00B<           >perl #83194: dynamic precision<
+>%vX<          >['012']<               >30.31.32<      >perl #83194: vector flag<
+>%*vX<         >[':', '012']<          >30:31:32<      >perl #83194: vector flag + custom separator<
+>%v.3X<                >['012']<               >030.031.032<   >perl #83194: vector flag + static precision<
+>%v.*X<                >[3, '012']<            >030.031.032<   >perl #83194: vector flag + dynamic precision<
+>%*v.3X<       >[':', '012']<          >030:031:032<   >perl #83194: vector flag + custom separator + static precision<
+>%*v.*X<       >[':', 3, '012']<       >030:031:032<   >perl #83194: vector flag + custom separator + dynamic precision<