Blame SOURCES/perl-5.31.0-perl-134008-an-alternative-test.patch
|
 |
78f1eb |
From 9dfe0a3438ae69872b71b98e4fb4f4bef084983d Mon Sep 17 00:00:00 2001
|
|
|
78f1eb |
From: Tony Cook <tony@develop-help.com>
|
|
|
78f1eb |
Date: Mon, 3 Jun 2019 14:34:17 +1000
|
|
|
78f1eb |
Subject: [PATCH 2/2] (perl #134008) an alternative test
|
|
|
78f1eb |
MIME-Version: 1.0
|
|
|
78f1eb |
Content-Type: text/plain; charset=UTF-8
|
|
|
78f1eb |
Content-Transfer-Encoding: 8bit
|
|
|
78f1eb |
|
|
|
78f1eb |
Signed-off-by: Petr Písař <ppisar@redhat.com>
|
|
|
78f1eb |
---
|
|
|
78f1eb |
t/op/sprintf2.t | 1 +
|
|
|
78f1eb |
1 file changed, 1 insertion(+)
|
|
|
78f1eb |
|
|
|
78f1eb |
diff --git a/t/op/sprintf2.t b/t/op/sprintf2.t
|
|
|
78f1eb |
index 569bd8053d..84259a4afd 100644
|
|
|
78f1eb |
--- a/t/op/sprintf2.t
|
|
|
78f1eb |
+++ b/t/op/sprintf2.t
|
|
|
78f1eb |
@@ -840,6 +840,7 @@ SKIP: {
|
|
|
78f1eb |
|
|
|
78f1eb |
# [rt.perl.org #134008]
|
|
|
78f1eb |
is(sprintf("%.*a", -99999, 1.03125), "0x1.08p+0", "[rt.perl.org #134008]");
|
|
|
78f1eb |
+ is(sprintf("%.*a", -100000,0), "0x0p+0", "negative precision ignored by format_hexfp");
|
|
|
78f1eb |
|
|
|
78f1eb |
# [rt.perl.org #128890]
|
|
|
78f1eb |
is(sprintf("%a", 0x1.18p+0), "0x1.18p+0");
|
|
|
78f1eb |
--
|
|
|
78f1eb |
2.20.1
|
|
|
78f1eb |
|