Remove the pack.t kludge introduced to fudge the test

to pass under long doubles: leave the similar kludge
to posix.t because POSIX::strtod() is still double,
not long double.

p4raw-id: //depot/cfgperl@5439

diff --git a/t/op/pack.t b/t/op/pack.t
index 867da8d..e4c7a9c 100755 (executable)
--- a/t/op/pack.t
+++ b/t/op/pack.t
@@ -19,9 +19,6 @@ print ($#ary == $#ary2 ? "ok 1\n" : "not ok 1\n");
 
 $out1=join(':',@ary);
 $out2=join(':',@ary2);
-# Using long double NVs may introduce greater accuracy than wanted.
-$out2 =~ s/:9\.87654321097999\d*:/:9.87654321098:/
-   if $Config{uselongdouble} eq 'define';
 print ($out1 eq $out2? "ok 2\n" : "not ok 2\n");
 
 print ($foo =~ /def/ ? "ok 3\n" : "not ok 3\n");