develooper Front page | perl.perl5.porters | Postings from January 2001

Patch 8138 broke a test in libwww

From:
andreas.koenig
Date:
January 7, 2001 16:47
Subject:
Patch 8138 broke a test in libwww
Message ID:
m3hf3a3m66.fsf@ak-71.mind.de
Since patch 8138

        Return of the IVUV-preservation, now seems to be happy even
        in Digital UNIX (the broken strtoul brokenness detection
        seems to have been the fly in the ointment).

the test t/base/negotiate.t in the libwww distribution fails. For some
reason a multiplication of

    DB<6> 
     HTTP::Negotiate::choose(/root/.cpan/build/libwww-perl-5.49/blib/lib/HTTP/Negotiate.pm:253):
  253:                $Q = $qs * $qe * $qc * $ql * $q;

with the values

    DB<7> x $qs, $qe, $qc, $ql, $q 
  0  1
  1  1
  2  1
  3  1
  4  0.25

results in $Q being 0, not 0.25.


-- 
andreas



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About