diff options
author | gregor herrmann <gregoa@debian.org> | 2015-08-18 12:53:29 +0200 |
---|---|---|
committer | gregor herrmann <gregoa@debian.org> | 2015-08-18 12:53:29 +0200 |
commit | 37f0fb35e5a03245a790b1079a868f8baf45293d (patch) | |
tree | 7d56cf0993e0123b8b8b89b39797c5ceef6ac434 | |
parent | b4ce5c6541da5c7ef566e7a56f8e670b55db5feb (diff) |
Imported Upstream version 1.39
-rwxr-xr-x | CHANGES | 3 | ||||
-rw-r--r-- | META.json | 5 | ||||
-rw-r--r-- | META.yml | 5 | ||||
-rw-r--r-- | SIGNATURE | 30 | ||||
-rwxr-xr-x | lib/Math/BigInt/GMP.pm | 2 | ||||
-rw-r--r-- | t/bigfltpm.inc | 4 | ||||
-rw-r--r-- | t/bigintpm.inc | 6 | ||||
-rw-r--r-- | t/biglog.t | 68 |
8 files changed, 64 insertions, 59 deletions
@@ -1,5 +1,8 @@ Revision history for Perl extension Math::BigInt::GMP. +2015-08-17 v1.39 pjacklam + * Updated test files with those from Math-BigInt-1.9997. + 2014-04-03 v1.38 pjacklam * Updated test files from the Math::BigInt distribution (Peter John Acklam). * Updated POD (Peter John Acklam) @@ -4,7 +4,7 @@ "Tels" ], "dynamic_config" : 1, - "generated_by" : "ExtUtils::MakeMaker version 6.94, CPAN::Meta::Converter version 2.140640", + "generated_by" : "ExtUtils::MakeMaker version 7.0401, CPAN::Meta::Converter version 2.150005", "license" : [ "perl_5" ], @@ -38,5 +38,6 @@ } }, "release_status" : "stable", - "version" : "1.38" + "version" : "1.39", + "x_serialization_backend" : "JSON::PP version 2.27300" } @@ -7,7 +7,7 @@ build_requires: configure_requires: ExtUtils::MakeMaker: '0' dynamic_config: 1 -generated_by: 'ExtUtils::MakeMaker version 6.94, CPAN::Meta::Converter version 2.140640' +generated_by: 'ExtUtils::MakeMaker version 7.0401, CPAN::Meta::Converter version 2.150005' license: perl meta-spec: url: http://module-build.sourceforge.net/META-spec-v1.4.html @@ -20,4 +20,5 @@ no_index: requires: Math::BigInt: '1.9993' XSLoader: '0.02' -version: '1.38' +version: '1.39' +x_serialization_backend: 'CPAN::Meta::YAML version 0.016' @@ -1,5 +1,5 @@ This file contains message digests of all files listed in MANIFEST, -signed via the Module::Signature module, version 0.73. +signed via the Module::Signature module, version 0.79. To verify the content in this distribution, first make sure you have Module::Signature installed, then type: @@ -15,15 +15,15 @@ not run its Makefile.PL or Build.PL. Hash: SHA1 SHA1 70d6187d0152848c922dc4360fa6dd3a3dc35c62 BUGS -SHA1 a3590f9b33b207ebfe55ea375ac754438f5a128b CHANGES +SHA1 9ee53f7a89f1714d55ba9c44628fb64f67fb9f73 CHANGES SHA1 dda5ca4f413031e9efcaa1600461d5e2adaa3a40 CREDITS SHA1 d7497d6d105042817c1734585be04ad2ebec4db2 GMP.xs SHA1 d6b7be7fb558f2df93e6bc55148bba35cae22ce4 INSTALL SHA1 d6a6c30ee6d9ba6b9afab8bbf6a25e1b23c744e0 LICENSE SHA1 f1f5d7799d2a10004d9fde9e929edaca038b8c6b MANIFEST SHA1 411ab4f05c252f85f12f12e087bae0adc5ba0aad MANIFEST.SKIP -SHA1 487a110705adf77f7c5b84075fe73308bdcc433c META.json -SHA1 0e776863fc72946e4be67987a3b7b941165a5a8c META.yml +SHA1 f6543265879897cc9f63ccc32dc28cd26a179c03 META.json +SHA1 e9b2f179145ef00c640e892b46f4ed1ca54417d3 META.yml SHA1 ab794c91e16a3cf176bf8c2f3f89b083a4035ae2 Makefile.PL SHA1 ddef2225fa80a87f3138f23cb7fdbc8468c1f58f README SHA1 6c7207c83d636868d3d1f1fc42f3f9e5897cbe85 TODO @@ -31,17 +31,17 @@ SHA1 fd48d0d8750eb949e485d8136b5b424fe73e9775 build/README SHA1 7bcc4113830721ad6e37a1ea79df94a6987c836d build/leak.pl SHA1 ac25bda8a6eb9058a9e42a8943c3e11b9fed88dc build/leaktest SHA1 58711d6c7095097a2b79697eb29cc361aa12da72 inc/Devel/CheckLib.pm -SHA1 57afa5ea67d4bb8bf6932ad78a64b83216552cb5 lib/Math/BigInt/GMP.pm +SHA1 89c12cdbb7192be088b21ce32b3553e375f85f0e lib/Math/BigInt/GMP.pm SHA1 6e9557e746e881ab1568cdcec17ff3c4f1508502 t/00sig.t SHA1 2b034eaa838015c62ed42cfc23cbc3814ce0a04f t/01load.t SHA1 02ef05af53cb7378452590324bb21dfe61f44069 t/02pod.t SHA1 c2891d57a7da799a196ae8b276da940cb3eccead t/03podcov.t -SHA1 e6bb2aea2f026016848db9ca96507c4ca4e3d265 t/bigfltpm.inc +SHA1 27da8d84b12593dbc8350efa6b43339a05d344ef t/bigfltpm.inc SHA1 9537400817c028f2282e3c085796ecbded0ccb66 t/bigfltpm.t SHA1 26c3ca060f6b7474ad8b2db3c1bae2b98e13adfd t/bigintg.t -SHA1 d5d419d73cc52371ba3487895fd49f793ffe4d0c t/bigintpm.inc +SHA1 03927c64235f9aa1f1f373bd71328ce7c9afdfb5 t/bigintpm.inc SHA1 73ac3701a1116b1831c871153c836f618a60f4d7 t/bigintpm.t -SHA1 5bdf82ef7085b97caa496bfc71ab1fbfe48ef9e8 t/biglog.t +SHA1 4e27fc0056d6455d278c0d38f5fe7f3c9a57fbe8 t/biglog.t SHA1 da260b6e02b220868fc7b4c0f87569299402fbf7 t/bigroot.t SHA1 f1bcab94173a57861fcc40ac90eb72f64aafea7f t/storable.t SHA1 e489ec79ce64d0d943e291a3eaa654298e6e49ab t/threads.t @@ -49,11 +49,11 @@ SHA1 20cf43acc1a728d0ee8245b106937a2a97900266 typemap -----BEGIN PGP SIGNATURE----- Version: GnuPG v1 -iQEcBAEBAgAGBQJTPpqeAAoJEGcmPl2fr166OTAIAL9qXmVxJmPQeR5C4zUxAakN -SNsMlXOJv5jIPLiG9SSMmIYbBWqRn/3iFUY6twrcffdEM1BCsJXPSj2kSOO7Pl+M -DCOwjtLYIXtltH8Fcutu5j12Z6uL91OoqtGNYk2DFsQhszbyNeRvRBvEclhGQZKH -d/Ji9c3E1MIrzKHDlASq7h+EsJEdL2a3qPQBTX17f4RkzAXqDGHUt1c0mal05DOm -xnY+6qBVjotsd3xODBNHeKhLYicWiv6jCFkoEa0HeNveJDMfT3BRMyx2ZUG0+1lV -1WpF765y7NVZ4Kv0tC20+rlCN0CmN+ICgePD02/x5Y6fqytsMpZGqg2sLEJdnek= -=nraw +iQEcBAEBAgAGBQJV0jSOAAoJEGcmPl2fr166HkIIALB10ldNvWbp3JxE+wn3XfdX +z/AOWy6uj7bpgPUffHfGkCpjkQ2fIJg5UFnEay6Fw/bSHOelomwMhv9g/wk5BMZA +wVoFybtsNKR7Mq3n4DwNVRotSn8qmnQKHUCGIVgZX+D97lNvvPg9vhBVQKwFHU9A +2IjybvYViXlrIBYlRJGF5OLoQpGDMJRSEPoKu75Ryk4gC2Y6g7Kt4yBi5XGUJMv5 +eXnrnf5nxDpSv7/snMRKMU3p/4ENyEsB1QZEMbZcr6xUI4Y0QjsoNeKYwRxNLm8s +8otCEEYwn5yIsxOBA3W/SwGJ5rfkl4MoGU3Cut2PhFZjhXTLD311AxRMB8KoT5E= +=UQ8p -----END PGP SIGNATURE----- diff --git a/lib/Math/BigInt/GMP.pm b/lib/Math/BigInt/GMP.pm index 9c04966..b10d0d6 100755 --- a/lib/Math/BigInt/GMP.pm +++ b/lib/Math/BigInt/GMP.pm @@ -9,7 +9,7 @@ use 5.006002; use vars qw/$VERSION/; -$VERSION = '1.38'; +$VERSION = '1.39'; use XSLoader; XSLoader::load "Math::BigInt::GMP", $VERSION; diff --git a/t/bigfltpm.inc b/t/bigfltpm.inc index 0911627..1528e48 100644 --- a/t/bigfltpm.inc +++ b/t/bigfltpm.inc @@ -1406,8 +1406,8 @@ NaNmul:-inf:NaN &fdiv-list 0:0:NaN,NaN 0:1:0,0 -9:4:2.25,1 -9:5:1.8,4 +9:4:2,1 +9:5:1,4 # bug in v1.74 with bdiv in list context, when $y is 1 or -1 2.1:-1:-2.1,0 2.1:1:2.1,0 diff --git a/t/bigintpm.inc b/t/bigintpm.inc index 0d47f6d..c3e815c 100644 --- a/t/bigintpm.inc +++ b/t/bigintpm.inc @@ -1135,7 +1135,7 @@ abc:abc:NaN +1:+32:4294967296 +1:+48:281474976710656 +8:-2:NaN -# excercise base 10 +# exercise base 10 +12345:4:10:123450000 -1234:0:10:-1234 +1234:0:10:1234 @@ -1153,7 +1153,7 @@ abc:abc:NaN +4294967296:+32:1 +281474976710656:+48:1 +2:-2:NaN -# excercise base 10 +# exercise base 10 -1234:0:10:-1234 +1234:0:10:1234 +200:2:10:2 @@ -1585,7 +1585,7 @@ inf:0:inf,inf 96969696969696969696969696969678787878626262626262626262626262:484848484848484848484848486666666666666689898989898989898989:199,484848484848484848484848123012121211954972727272727272727451 # bug in v1.76 1267650600228229401496703205375:1267650600228229401496703205376:0,1267650600228229401496703205375 -# excercise shortcut for numbers of the same length in div +# exercise shortcut for numbers of the same length in div 999999999999999999999999999999999:999999999999999999999999999999999:1,0 999999999999999999999999999999999:888888888888888888888888888888888:1,111111111111111111111111111111111 999999999999999999999999999999999:777777777777777777777777777777777:1,222222222222222222222222222222222 @@ -46,17 +46,17 @@ $cl = "Math::BigFloat"; # some alarm()? # this triggers the calculation and caching of ln(2): -ok ($cl->new(5)->blog(undef,71), +is ($cl->new(5)->blog(undef,71), '1.6094379124341003746007593332261876395256013542685177219126478914741790'); # if the cache was correct, we should get this result, fast: -ok ($cl->new(2)->blog(undef,71), +is ($cl->new(2)->blog(undef,71), '0.69314718055994530941723212145817656807550013436025525412068000949339362'); -ok ($cl->new(10)->blog(undef,71), -'2.3025850929940456840179914546843642076011014886287729760333279009675726'); +is ($cl->new(11)->blog(undef,71), +'2.3978952727983705440619435779651292998217068539374171752185677091305736'); -ok ($cl->new(21)->blog(undef,71), +is ($cl->new(21)->blog(undef,71), '3.0445224377234229965005979803657054342845752874046106401940844835750742'); ############################################################################# @@ -65,52 +65,52 @@ ok ($cl->new(21)->blog(undef,71), # Don't attempt to run them with older versions. You are warned. # $x < 0 => NaN -ok ($cl->new(-2)->blog(), 'NaN'); -ok ($cl->new(-1)->blog(), 'NaN'); -ok ($cl->new(-10)->blog(), 'NaN'); -ok ($cl->new(-2,2)->blog(), 'NaN'); +is ($cl->new(-2)->blog(), 'NaN'); +is ($cl->new(-1)->blog(), 'NaN'); +is ($cl->new(-10)->blog(), 'NaN'); +is ($cl->new(-2,2)->blog(), 'NaN'); my $ten = $cl->new(10)->blog(); # 10 is cached (up to 75 digits) -ok ($cl->new(10)->blog(), '2.302585092994045684017991454684364207601'); +is ($cl->new(10)->blog(), '2.302585092994045684017991454684364207601'); # 0.1 is using the cached value for log(10), too -ok ($cl->new(0.1)->blog(), -$ten); -ok ($cl->new(0.01)->blog(), -$ten * 2); -ok ($cl->new(0.001)->blog(), -$ten * 3); -ok ($cl->new(0.0001)->blog(), -$ten * 4); +is ($cl->new(0.1)->blog(), -$ten); +is ($cl->new(0.01)->blog(), -$ten * 2); +is ($cl->new(0.001)->blog(), -$ten * 3); +is ($cl->new(0.0001)->blog(), -$ten * 4); # also cached -ok ($cl->new(2)->blog(), '0.6931471805599453094172321214581765680755'); -ok ($cl->new(4)->blog(), $cl->new(2)->blog * 2); +is ($cl->new(2)->blog(), '0.6931471805599453094172321214581765680755'); +is ($cl->new(4)->blog(), $cl->new(2)->blog * 2); # These are still slow, so do them only to 10 digits -ok ($cl->new('0.2')->blog(undef,10), '-1.609437912'); -ok ($cl->new('0.3')->blog(undef,10), '-1.203972804'); -ok ($cl->new('0.4')->blog(undef,10), '-0.9162907319'); -ok ($cl->new('0.5')->blog(undef,10), '-0.6931471806'); -ok ($cl->new('0.6')->blog(undef,10), '-0.5108256238'); -ok ($cl->new('0.7')->blog(undef,10), '-0.3566749439'); -ok ($cl->new('0.8')->blog(undef,10), '-0.2231435513'); -ok ($cl->new('0.9')->blog(undef,10), '-0.1053605157'); +is ($cl->new('0.2')->blog(undef,10), '-1.609437912'); +is ($cl->new('0.3')->blog(undef,10), '-1.203972804'); +is ($cl->new('0.4')->blog(undef,10), '-0.9162907319'); +is ($cl->new('0.5')->blog(undef,10), '-0.6931471806'); +is ($cl->new('0.6')->blog(undef,10), '-0.5108256238'); +is ($cl->new('0.7')->blog(undef,10), '-0.3566749439'); +is ($cl->new('0.8')->blog(undef,10), '-0.2231435513'); +is ($cl->new('0.9')->blog(undef,10), '-0.1053605157'); -ok ($cl->new('9')->blog(undef,10), '2.197224577'); +is ($cl->new('9')->blog(undef,10), '2.197224577'); -ok ($cl->new('10')->blog(10,10), '1.000000000'); -ok ($cl->new('20')->blog(20,10), '1.000000000'); -ok ($cl->new('100')->blog(100,10), '1.000000000'); +is ($cl->new('10')->blog(10,10), '1.000000000'); +is ($cl->new('20')->blog(20,10), '1.000000000'); +is ($cl->new('100')->blog(100,10), '1.000000000'); -ok ($cl->new('100')->blog(10,10), '2.000000000'); # 10 ** 2 == 100 -ok ($cl->new('400')->blog(20,10), '2.000000000'); # 20 ** 2 == 400 +is ($cl->new('100')->blog(10,10), '2.000000000'); # 10 ** 2 == 100 +is ($cl->new('400')->blog(20,10), '2.000000000'); # 20 ** 2 == 400 -ok ($cl->new('4')->blog(2,10), '2.000000000'); # 2 ** 2 == 4 -ok ($cl->new('16')->blog(2,10), '4.000000000'); # 2 ** 4 == 16 +is ($cl->new('4')->blog(2,10), '2.000000000'); # 2 ** 2 == 4 +is ($cl->new('16')->blog(2,10), '4.000000000'); # 2 ** 4 == 16 -ok ($cl->new('1.2')->bpow('0.3',10), '1.056219968'); -ok ($cl->new('10')->bpow('0.6',10), '3.981071706'); +is ($cl->new('1.2')->bpow('0.3',10), '1.056219968'); +is ($cl->new('10')->bpow('0.6',10), '3.981071706'); # blog should handle bigint input is (Math::BigFloat::blog(Math::BigInt->new(100),10), 2, "blog(100)"); |