Skip Menu |
 

This queue is for tickets about the Math-BigInt CPAN distribution.

Report information
The Basics
Id: 118468
Status: resolved
Priority: 0/
Queue: Math-BigInt

People
Owner: Nobody in particular
Requestors: jhi [...] iki.fi
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: 1.999800

Attachments
0001-vax-netbsd-different-float-range.patch



Subject: [PATCH] patch for VAX (netbsd-vax)
Download (untitled) / with headers
text/plain 215b
The VAX floating point is different: smaller range (and no inf/nan, but that is not problem with Math-BigInt). The attached patch makes Math-BigInt work with VAX (the Perl 5.26 is expected to support netbsd-vax).
Subject: 0001-vax-netbsd-different-float-range.patch
From dff6159181fa11bec766cff281da098a0421db3d Mon Sep 17 00:00:00 2001 From: Jarkko Hietaniemi <jhi@iki.fi> Date: Sat, 22 Oct 2016 08:58:30 -0400 Subject: [PATCH] vax-netbsd: different float range --- cpan/Math-BigInt/t/bigintpm.inc | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/cpan/Math-BigInt/t/bigintpm.inc b/cpan/Math-BigInt/t/bigintpm.inc index e996c69..d793ce1 100644 --- a/cpan/Math-BigInt/t/bigintpm.inc +++ b/cpan/Math-BigInt/t/bigintpm.inc @@ -564,9 +564,13 @@ is($x->bsstr(), '105e+13', # not 1.05e+15 $z = 1e+129; # definitely a float (may fail on UTS) # don't compare to $z, since some Perl versions stringify $z into something # like '1.e+129' or something equally ugly +SKIP:{ +my $vax_float = (pack("d",1) =~ /^[\x80\x10]\x40/); +skip("vax float range smaller", 1) if $vax_float; $x = $CLASS->new($z); is($x->bsstr(), '1e+129', qq|\$x = $CLASS->new($z); \$x->bsstr() = "1e+129"|); +} ############################################################################### # test for whitespace including newlines to be handled correctly -- 2.9.3


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.