From 347fb9454d081c2681824ccfe356ab4a77ffa2a5 Mon Sep 17 00:00:00 2001 From: Ilya Zakharevich Date: Sat, 19 May 2001 00:04:23 -0400 Subject: [PATCH] Mis-Failing tests Message-ID: <20010519040423.A16861@math.ohio-state.edu> (In bleadperl patched b-stash.t instead of b.t) p4raw-id: //depot/perl@10164 --- t/lib/b-stash.t | 6 ++++-- t/lib/bigfltpm.t | 2 +- 2 files changed, 5 insertions(+), 3 deletions(-) diff --git a/t/lib/b-stash.t b/t/lib/b-stash.t index 3d12de3..947a2ad 100644 --- a/t/lib/b-stash.t +++ b/t/lib/b-stash.t @@ -39,8 +39,10 @@ if ($Is_VMS) { $a =~ s/-uVMS,-uVMS::Filespec,//; $a =~ s/-uSocket,//; # Socket is optional/compiler version dependent } -if ($Config{static_ext} eq ' ' || - ($Config{static_ext} eq 'Socket' && $Is_VMS)) { +if (($Config{static_ext} eq ' ' || + ($Config{static_ext} eq 'Socket' && $Is_VMS)) + && !($^O eq 'os2' and $OS2::is_aout) + ) { if (ord('A') == 193) { # EBCDIC sort order is qw(a A) not qw(A a) $b = join ',', sort split /,/, $b; } diff --git a/t/lib/bigfltpm.t b/t/lib/bigfltpm.t index 18bab4f..8247e42 100755 --- a/t/lib/bigfltpm.t +++ b/t/lib/bigfltpm.t @@ -282,7 +282,7 @@ $Math::BigFloat::rnd_mode = 'even' -6.35:-1:/-6.(?:4|39{5}\d+|29{8}\d+) -0.0065:-1:0 -0.0065:-2:/-0\.01|-1e-02 --0.0065:-3:/-0\.006|-7e-03 +-0.0065:-3:/-0\.006|-7e-03|-6e-03 -0.0065:-4:/-0\.006(?:5|49{5}\d+)|-6\.5e-03 -0.0065:-5:/-0\.006(?:5|49{5}\d+)|-6\.5e-03 &fcmp -- 2.7.4