diff options
| author |   afresh1 <afresh1@openbsd.org> | 2019-02-13 21:15:00 +0000 |
|---|---|---|
| committer | afresh1 <afresh1@openbsd.org> | 2019-02-13 21:15:00 +0000 |
| commit | 9f11ffb7133c203312a01e4b986886bc88c7d74b (patch) | |
| tree | 6618511204c614b20256e4ef9dea39a7b311d638 /gnu/usr.bin/perl/cpan/bignum/t | |
| parent | Import perl-5.28.1 (diff) | |
| download | wireguard-openbsd-9f11ffb7133c203312a01e4b986886bc88c7d74b.tar.xz wireguard-openbsd-9f11ffb7133c203312a01e4b986886bc88c7d74b.zip | |
Fix merge issues, remove excess files - match perl-5.28.1 dist
looking good sthen@, Great! bluhm@
Diffstat (limited to 'gnu/usr.bin/perl/cpan/bignum/t')
| -rwxr-xr-x | gnu/usr.bin/perl/cpan/bignum/t/bigexp.t | 1 | ||||
| -rw-r--r-- | gnu/usr.bin/perl/cpan/bignum/t/infnan.inc | 1 | ||||
| -rwxr-xr-x | gnu/usr.bin/perl/cpan/bignum/t/scope_f.t | 1 |
3 files changed, 0 insertions, 3 deletions
diff --git a/gnu/usr.bin/perl/cpan/bignum/t/bigexp.t b/gnu/usr.bin/perl/cpan/bignum/t/bigexp.t index 03355a59461..61d39b2b82f 100755 --- a/gnu/usr.bin/perl/cpan/bignum/t/bigexp.t +++ b/gnu/usr.bin/perl/cpan/bignum/t/bigexp.t @@ -12,7 +12,6 @@ use bignum; my $ln_ev = -7 / (10 ** 17); my $ev = exp($ln_ev); - is(sprintf('%0.5f', $ev), '1.00000', '($ev) is approx. 1'); is(sprintf('%0.5f', 1 - $ev), '0.00000', '(1-$ev) is approx. 0'); is(sprintf('%0.5f', 1 - "$ev"), '0.00000', '(1-"$ev") is approx. 0'); diff --git a/gnu/usr.bin/perl/cpan/bignum/t/infnan.inc b/gnu/usr.bin/perl/cpan/bignum/t/infnan.inc index 695b9135dd6..5ecc7b5936b 100644 --- a/gnu/usr.bin/perl/cpan/bignum/t/infnan.inc +++ b/gnu/usr.bin/perl/cpan/bignum/t/infnan.inc @@ -75,7 +75,6 @@ is($x->bstr(), 'NaN', qq|$x = inf * NaN; $x->bstr() = 'NaN'|); for my $nan (qw/ nan naN nAn nAN Nan NaN NAn NAN /) { my $x = 1 + $nan; - print ref($x), "<<<\n"; is($x->bstr(), "NaN", qq|\$x = 1 + "$nan"; \$x->bstr() = "NaN"|); isa_ok($x, "Math::BigInt"); } diff --git a/gnu/usr.bin/perl/cpan/bignum/t/scope_f.t b/gnu/usr.bin/perl/cpan/bignum/t/scope_f.t index 23ffc3a665b..e932ea2b9f7 100755 --- a/gnu/usr.bin/perl/cpan/bignum/t/scope_f.t +++ b/gnu/usr.bin/perl/cpan/bignum/t/scope_f.t @@ -32,4 +32,3 @@ SKIP: { isnt (ref(hex(9)), 'Math::BigInt', 'hex is not overloaded'); isnt (ref(oct(07)), 'Math::BigInt', 'oct is not overloaded'); } - |