hexfp: these should be tested only with uselongdouble.

[perl5.git] / t / op / sprintf2.t

diff --git a/t/op/sprintf2.t b/t/op/sprintf2.t
index 48986f0..9d369cb 100644 (file)
--- a/t/op/sprintf2.t
+++ b/t/op/sprintf2.t
@@ -666,7 +666,9 @@ for my $t (@hexfloat) {
 # double-double long double %a special testing.
 SKIP: {
     skip("$^O doublekind=$Config{doublekind}", 6)
-        unless ($Config{doublekind} == 4 && $^O eq 'linux');
+        unless ($Config{doublekind} == 4 &&
+                $^O eq 'linux' &&
+                $Config{uselongdouble});
     # [rt.perl.org 125633]
     like(sprintf("%La\n", (2**1020) + (2**-1072)),
          qr/^0x1.0{522}1p\+1020$/);