| Subject: | Test fails with -Duselongdouble |
The t/GO-TermFinder-Native.t test fails if run with perls with -Duselongdouble enabled:
# Test 3 got: "0.693147180559945309" (t/GO-TermFinder-Native.t at line 38 fail #3)
# Expected: "0.693147180559945286"
# t/GO-TermFinder-Native.t line 38 is: for (my $i = 0; $i <= 10; $i++){
# Test 4 got: "1.791759469228055" (t/GO-TermFinder-Native.t at line 38 fail #4)
# Expected: "1.79175946922805496"
# Test 5 got: "3.17805383034794562" (t/GO-TermFinder-Native.t at line 38 fail #5)
# Expected: "3.17805383034794531"
# Test 6 got: "4.78749174278204599" (t/GO-TermFinder-Native.t at line 38 fail #6)
# Expected: "4.78749174278204581"
# Test 7 got: "6.579251212010101" (t/GO-TermFinder-Native.t at line 38 fail #7)
# Expected: "6.57925121201010121"
# Test 8 got: "8.5251613610654143" (t/GO-TermFinder-Native.t at line 38 fail #8)
# Expected: "8.52516136106541467"
# Test 9 got: "10.6046029027452502" (t/GO-TermFinder-Native.t at line 38 fail #9)
# Expected: "10.6046029027452509"
# Test 10 got: "12.8018274800814696" (t/GO-TermFinder-Native.t at line 38 fail #10)
# Expected: "12.8018274800814709"
# Test 11 got: "15.1044125730755153" (t/GO-TermFinder-Native.t at line 38 fail #11)
# Expected: "15.1044125730755177"
# Test 12 got: "5.34710753071747114" (t/GO-TermFinder-Native.t at line 63)
# Expected: "5.34710753071746868"
# t/GO-TermFinder-Native.t line 63 is: ok($d->logNCr($n, $r), log($nChooseR));
# Test 13 got: "0.238095238095238095" (t/GO-TermFinder-Native.t at line 94)
# Expected: "0.238095238095237582"
# t/GO-TermFinder-Native.t line 94 is: ok($probability, $d->hypergeometric($x, $n, $M, $N));
t/GO-TermFinder-Native.t ....................
Failed 11/15 subtests