:-)
Thanks, applied.
Tim.
On Fri, Aug 23, 2002 at 03:18:03PM +0200, H.Merijn Brand wrote:
> HP-UX 10.20 + Oracle 7.3.4.1 + DBI-1.30 + DBD::Oracle-1.12 + perl-5.8.0
>
> needs the following (realy very very small :) change to pass all tests
>
> --- t/general.t 2001-08-29 21:39:21.000000000 +0200
> +++ t/general.t 2002-08-23 15:09:21.000000000 +0200
> @@ -57,7 +57,7 @@ # so following test works with other NLS
> }));
> my @tmp = @{$tmp->[0]};
> #warn "@tmp"; $tmp[0]+=0; $tmp[1]+=0; warn "@tmp";
> -ok(0, $tmp[0] <= 1e-130, $tmp[0]);
> +ok(0, $tmp[0] <= 1.0000000000000000000000000000000001e-130, $tmp[0]);
> ok(0, $tmp[1] >= 9.99e+125, $tmp[1]);
>
>
>
> --
> H.Merijn Brand Amsterdam Perl Mongers (http://amsterdam.pm.org/)
> using perl-5.6.1, 5.8.0 & 632 on HP-UX 10.20 & 11.00, AIX 4.2, AIX 4.3,
> WinNT 4, Win2K pro & WinCE 2.11 often with Tk800.024 &/| DBD-Unify
> ftp://ftp.funet.fi/pub/languages/perl/CPAN/authors/id/H/HM/HMBRAND/
>
>
