Hello community,
here is the log from the commit of package perl-Math-BigInt for
openSUSE:Factory checked in at 2015-11-08 11:27:01
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Math-BigInt (Old)
and /work/SRC/openSUSE:Factory/.perl-Math-BigInt.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Math-BigInt"
Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-Math-BigInt/perl-Math-BigInt.changes
2015-10-30 21:52:57.000000000 +0100
+++ /work/SRC/openSUSE:Factory/.perl-Math-BigInt.new/perl-Math-BigInt.changes
2015-11-08 11:27:15.000000000 +0100
@@ -1,0 +2,6 @@
+Fri Nov 6 10:06:53 UTC 2015 - co...@suse.com
+
+- updated to 1.999708
+ see /usr/share/doc/packages/perl-Math-BigInt/CHANGES
+
+-------------------------------------------------------------------
Old:
----
Math-BigInt-1.999707.tar.gz
New:
----
Math-BigInt-1.999708.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-Math-BigInt.spec ++++++
--- /var/tmp/diff_new_pack.KCvJvm/_old 2015-11-08 11:27:16.000000000 +0100
+++ /var/tmp/diff_new_pack.KCvJvm/_new 2015-11-08 11:27:16.000000000 +0100
@@ -17,7 +17,7 @@
Name: perl-Math-BigInt
-Version: 1.999707
+Version: 1.999708
Release: 0
%define cpan_name Math-BigInt
Summary: Arbitrary size integer/float math package
++++++ Math-BigInt-1.999707.tar.gz -> Math-BigInt-1.999708.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Math-BigInt-1.999707/CHANGES
new/Math-BigInt-1.999708/CHANGES
--- old/Math-BigInt-1.999707/CHANGES 2015-10-29 16:41:47.000000000 +0100
+++ new/Math-BigInt-1.999708/CHANGES 2015-11-03 15:08:35.000000000 +0100
@@ -1431,7 +1431,7 @@
* Add documentation for as_float() in lib/Math/BigFloat.pm
- * Added test files t/objectify_mbf.t and t/objectify_mbi.t.
+ * Add test files t/objectify_mbf.t and t/objectify_mbi.t.
2015-10-26 v1.999705 pjacklam
@@ -1442,20 +1442,20 @@
2015-10-28 v1.999706 pjacklam
- * Corrected release date of v1.999705 in CHANGES.
+ * Correct release date of v1.999705 in CHANGES.
- * Added code and tests for numify() on non-finite objects.
+ * Add code and tests for numify() on non-finite objects.
2015-10-29 v1.999707 pjacklam
- * Added dependency on Math::Complex 1.39 for Math::Complex::Inf(), which is
+ * Add dependency on Math::Complex 1.39 for Math::Complex::Inf(), which is
used for numifying infinity.
- * Updated author information.
+ * Update author information.
- * Updated information in the file README.
+ * Update information in the file README.
- * Removed the files INSTALL and LICENSE as this information is already covered
+ * Remove the files INSTALL and LICENSE as this information is already covered
in the file README.
* Enable 'use warnings' in all modules. We require a Perl newer than 5.6.0
@@ -1468,6 +1468,26 @@
* Moved 'Test::More' from 'build_requires' to 'test_requires' in Makefile.PL.
+2015-11-03 v1.999708 pjacklam
+
+ * Use bxxx() method names consistently, rather than mixing bxxx() and fxxx()
+ in code and test files. The fxxx() methods for Math::BigFloat objects are
+ still available through autoloading. However, we leave the fround() method
+ in Math::BigInt, as it seems to provide some kind of compatibility with
+ Math::BigFloat.
+
+ * Correct author information in the README file.
+
+ * Remove INSTALL file, which by accident wasn't removed in v1.999707.
+
+ * Use present tense, not past tense, in CHANGES file.
+
+ * Add '#!perl' to Makefile.PL for correct syntax highlighting in editors
+ supporting this.
+
+ * Use Math::Complex::Inf() in testfiles also (for generating Perl scalar
+ infinity) since it is more portable.
+
Please send us test-reports, your experiences with this and your ideas - we
love
to hear about our work!
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Math-BigInt-1.999707/META.json
new/Math-BigInt-1.999708/META.json
--- old/Math-BigInt-1.999707/META.json 2015-10-29 16:43:14.000000000 +0100
+++ new/Math-BigInt-1.999708/META.json 2015-11-03 15:19:07.000000000 +0100
@@ -40,6 +40,6 @@
}
},
"release_status" : "stable",
- "version" : "1.999707",
+ "version" : "1.999708",
"x_serialization_backend" : "JSON::PP version 2.27300"
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Math-BigInt-1.999707/META.yml
new/Math-BigInt-1.999708/META.yml
--- old/Math-BigInt-1.999707/META.yml 2015-10-29 16:43:11.000000000 +0100
+++ new/Math-BigInt-1.999708/META.yml 2015-11-03 15:19:05.000000000 +0100
@@ -22,5 +22,5 @@
Math::Complex: '1.39'
Test::More: '0.62'
perl: '5.006002'
-version: '1.999707'
+version: '1.999708'
x_serialization_backend: 'CPAN::Meta::YAML version 0.016'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Math-BigInt-1.999707/Makefile.PL
new/Math-BigInt-1.999708/Makefile.PL
--- old/Math-BigInt-1.999707/Makefile.PL 2015-10-29 15:53:33.000000000
+0100
+++ new/Math-BigInt-1.999708/Makefile.PL 2015-11-02 10:25:13.000000000
+0100
@@ -1,3 +1,5 @@
+#!perl
+
# We need at least Perl 5.6
require 5.006002;
use strict;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Math-BigInt-1.999707/README
new/Math-BigInt-1.999708/README
--- old/Math-BigInt-1.999707/README 2015-10-29 15:52:44.000000000 +0100
+++ new/Math-BigInt-1.999708/README 2015-10-30 15:42:21.000000000 +0100
@@ -37,7 +37,13 @@
COPYRIGHT AND LICENCE
-Copyright 2007-2010 Peter John Acklam <pjack...@online.no>
+Copyright 1996-2001 Mark Biggar, Ilya Zakharevich.
+
+Copyright 2001-2008 Tels, L<http://bloodgate.com>.
+
+Copyright 2010 Florian Ragwitz L<fl...@cpan.org>.
+
+Copyright 2011- Peter John Acklam L<pjack...@online.no>.
This program is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Math-BigInt-1.999707/SIGNATURE
new/Math-BigInt-1.999708/SIGNATURE
--- old/Math-BigInt-1.999707/SIGNATURE 2015-10-29 16:43:18.000000000 +0100
+++ new/Math-BigInt-1.999708/SIGNATURE 2015-11-03 15:19:10.000000000 +0100
@@ -16,18 +16,18 @@
SHA1 f6ef98e8f3f6a4f670d569f279ef5a3c05c16d0c BENCHMARK
SHA1 d681b992c9e027633a59fbd52530805ee4e1621c BUGS
-SHA1 e1631812ed199c52be5185306d15e4bb4593891c CHANGES
+SHA1 c380b0fefc9e2de150524fa21316cd437fe2a72c CHANGES
SHA1 f27c8bd98e754f96c9825fa6ce9f1244c93bdbe6 CREDITS
SHA1 bc2db74538d3acd53f71b5512a144fe18c253ecd GOALS
SHA1 fe61299e80a1dca48fbaa33f0869e3238ec07c70 HISTORY
SHA1 d6a6c30ee6d9ba6b9afab8bbf6a25e1b23c744e0 LICENSE
SHA1 e717092a11b1e42a0a7b340c68e75fa84b8a68b8 MANIFEST
SHA1 86df44fbe1ea7a68897113f0e327d0f0c25b91e3 MANIFEST.SKIP
-SHA1 20885b2d7e7695e64a9164d2b557a3f728de8a84 META.json
-SHA1 0b7fa178b5c3b96317f466af4de50517da24442d META.yml
-SHA1 a3da36a5af3eedcf0461fea65319bc69e8ff69ee Makefile.PL
+SHA1 3be1ef46b80d8582927d3409862840bcc8ff35ce META.json
+SHA1 7811a0e4c31565c82f8f264759c21dd6a4ef78e6 META.yml
+SHA1 e73fa91f03bf0cb3b117845cd60c200fb30be2ca Makefile.PL
SHA1 4e2191d1724e699862efc5350f480c8e02755112 NEW
-SHA1 a1c4ab669fbeff68e7965c1bc3ced16d17a9f2f5 README
+SHA1 813c62e6d3edd18b7b634765ecbd75b2cd6389a0 README
SHA1 f1500916b488220b707bc10a0388d7dbcfd52e99 TODO
SHA1 c2bbe82659480de8710b9e64a62d47b64dddd2d2 examples/1000.txt
SHA1 fe55e27b4791656d36a6c9548280746de7003be5 examples/bigprimes.pl
@@ -40,10 +40,10 @@
SHA1 2e33e87882d60db3913da6284dd5295e5315e18a inc/Module/Install/Metadata.pm
SHA1 c830b819e61bda5eca077c6291293bba61b3b9f2 inc/Module/Install/Win32.pm
SHA1 cb52b9d6f88d512d448a6f35ed0af0d1201a134b inc/Module/Install/WriteAll.pm
-SHA1 1914eb138f472f8fc090078c7b44259b000e3069 lib/Math/BigFloat.pm
-SHA1 5c79f8bb3acd0d867409ee39b2a9c32ae70e1ca6 lib/Math/BigInt.pm
-SHA1 486fc42db97cd2a05ea4c845e0bae2733d3d2896 lib/Math/BigInt/Calc.pm
-SHA1 56ceeb7353bf171e53dc2f8bb662a20c9f530f8b lib/Math/BigInt/CalcEmu.pm
+SHA1 cb779827a1fc79975094e40f169fa25ea1321835 lib/Math/BigFloat.pm
+SHA1 ceee066901c52d7e1f6d55cf16b249e1caea6f71 lib/Math/BigInt.pm
+SHA1 d8f02a9bb0434f8116f97fc8e3c7bcdfb23f7091 lib/Math/BigInt/Calc.pm
+SHA1 2aee9080c2c3098afaa3dda4000fb3dfa858059e lib/Math/BigInt/CalcEmu.pm
SHA1 385cc7ed3bf3e6290640b9880445ca9a3dea629e t/00sig.t
SHA1 4463fdcebb8421cc2e63f87d678adb47856bf58c t/01load.t
SHA1 b2ed9206ca5b69ec3b8bbf850bf4b6dfde518e7e t/02pod.t
@@ -58,10 +58,10 @@
SHA1 633a5d1446321301fe2fbf8d440111ad62ffddfb t/bare_mbi.t
SHA1 97fb1db80aeb4ab007e2260d35329e149edf5e05 t/bare_mif.t
SHA1 333a425247b4e276696210a6322b815a0f55f5ab t/big_pi_e.t
-SHA1 9bc755bda3026da5300d62e88bd797ead7366348 t/bigfltpm.inc
-SHA1 10f64067004036704aa30c0e40da7a8d83eef708 t/bigfltpm.t
+SHA1 99550df360cd7a07cce39afd142aac112adea6e3 t/bigfltpm.inc
+SHA1 adc335657a51b82eeca6cd24a6caa24263283017 t/bigfltpm.t
SHA1 b3ceebc429c05bce95347575d28348306dbcfcc8 t/bigintc.t
-SHA1 7954255fd6b3a4a09b6e47c98a1ed79d40a49e22 t/bigintpm.inc
+SHA1 0d2491a3abeff02a6e0998cfaaede98a1f993d63 t/bigintpm.inc
SHA1 ba3d855434e4fea04c22bdd54076ed9706a79d5f t/bigintpm.t
SHA1 cb07d195c20eb306088eeacccc2c7475f267446c t/bigints.t
SHA1 0e505ab877fb41505d683163ad3f09027f9eef35 t/biglog.t
@@ -79,8 +79,8 @@
SHA1 18071d0caf17979c5345baf7b296a1e95d8f9bf1 t/mbf_ali.t
SHA1 79fafec237d6f47d8a176c67418f94c708ed3fec t/mbi_ali.t
SHA1 2b9490eab4d5371b804a39fb16e77c6bd6bbd006 t/mbi_rand.t
-SHA1 38d000d99cb2492ab518786e62ab1fae710e0f8d t/mbimbf.inc
-SHA1 b13701babf6c3952a0b8de3803de838d52a13ddc t/mbimbf.t
+SHA1 171fffe6a1b291c7c4cd84c1c1ebd48efa420c64 t/mbimbf.inc
+SHA1 ec0499541f1915a02637cf7d78b5d28247bee53f t/mbimbf.t
SHA1 a8e152beb9c0583cca8ba397ca2952cf456f107c t/nan_cmp.t
SHA1 852bfc6c25fa982e0c48e270277f091732d062e2 t/new_overloaded.t
SHA1 7b8ad0d8e8bb1afb985d3af119bcd284a2ae105f t/objectify_mbf.t
@@ -113,11 +113,11 @@
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1
-iQEcBAEBAgAGBQJWMj6TAAoJEGcmPl2fr166dAQH/RfhE0u3Rl7TxLyTDikGrPX2
-xL21DLsagbLKn705iFqxRiDRzI6lQ/cQEaI37wDeAee6IrABAZW5daFKGJgAv83q
-3K+oDFnNfiPHQvmJdlbkvGJw2Xyi8HPrKwDbUifXxPblMPiHVzJT/84o68FYwqrq
-CcpkRQ+FgoraH+zW4k9m9FLfTCNkgCioP/WqzZmVp6aRcyyiOdMWQlZQauyKMhSk
-YFlcPHaRvJJ8AUS6ktAsX0E+qM7CZo3oINMO1CqzgYZlxZTXklGSKMwA69ymVPMa
-C5s1uZM/cjnyK11BVclqoWy/Xyuswagud1WBs2wV7ybTrS4rPMOy20Ye+Musv/w=
-=52Ia
+iQEcBAEBAgAGBQJWOMJbAAoJEGcmPl2fr166ongH/RTUscTKeeO6W9XL1YAIJpOM
+akCBo5Klua7sqLPUOltYjUNix98Td2xOWYatcArDZUUnTQ4oFDt2fJROG7bDWV68
+W0yRIrNY7KKqnw8NJ4QL+QERvO9OsflY1QTXSCRrmjqqFOTqF3ujifxZ2NnVSF7C
+98RMtn7Mtb7evYpp46ND0L9nFzN76G96bXLSF+7xBWFV7oL1Ru5/CpEJpJLbaIOT
+B+xOoj7MxIvCy0zA5WD/Mu9FX7SuIKZbmku5t6hvit5X6f3snRNvhLP/GvpNUEcE
+LLKIbqCiB754PoBDqmEnEzK2hfhKFxlvhyuS2G5eoqM3qGBAypEduoW6zi08nHI=
+=2wlX
-----END PGP SIGNATURE-----
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Math-BigInt-1.999707/lib/Math/BigFloat.pm
new/Math-BigInt-1.999708/lib/Math/BigFloat.pm
--- old/Math-BigInt-1.999707/lib/Math/BigFloat.pm 2015-10-29
16:38:48.000000000 +0100
+++ new/Math-BigInt-1.999708/lib/Math/BigFloat.pm 2015-10-30
13:56:54.000000000 +0100
@@ -16,7 +16,7 @@
use strict;
use warnings;
-our $VERSION = '1.999707';
+our $VERSION = '1.999708';
require Exporter;
our @ISA = qw/Math::BigInt/;
@@ -4286,26 +4286,26 @@
=over
-=item ffround ( +$scale )
+=item bfround ( +$scale )
Rounds to the $scale'th place left from the '.', counting from the dot.
The first digit is numbered 1.
-=item ffround ( -$scale )
+=item bfround ( -$scale )
Rounds to the $scale'th place right from the '.', counting from the dot.
-=item ffround ( 0 )
+=item bfround ( 0 )
Rounds to an integer.
-=item fround ( +$scale )
+=item bround ( +$scale )
Preserves accuracy to $scale digits from the left (aka significant digits)
and pads the rest with zeros. If the number is between 1 and -1, the
significant digits count from the first non-zero after the '.'
-=item fround ( -$scale ) and fround ( 0 )
+=item bround ( -$scale ) and bround ( 0 )
These are effectively no-ops.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Math-BigInt-1.999707/lib/Math/BigInt/Calc.pm
new/Math-BigInt-1.999708/lib/Math/BigInt/Calc.pm
--- old/Math-BigInt-1.999707/lib/Math/BigInt/Calc.pm 2015-10-29
16:27:41.000000000 +0100
+++ new/Math-BigInt-1.999708/lib/Math/BigInt/Calc.pm 2015-10-30
13:59:45.000000000 +0100
@@ -4,7 +4,7 @@
use strict;
use warnings;
-our $VERSION = '1.999707';
+our $VERSION = '1.999708';
# Package to store unsigned big integers in decimal and do math with them
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Math-BigInt-1.999707/lib/Math/BigInt/CalcEmu.pm
new/Math-BigInt-1.999708/lib/Math/BigInt/CalcEmu.pm
--- old/Math-BigInt-1.999707/lib/Math/BigInt/CalcEmu.pm 2015-10-29
16:29:10.000000000 +0100
+++ new/Math-BigInt-1.999708/lib/Math/BigInt/CalcEmu.pm 2015-10-30
13:59:50.000000000 +0100
@@ -4,7 +4,7 @@
use strict;
use warnings;
-our $VERSION = '1.999707';
+our $VERSION = '1.999708';
package Math::BigInt;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Math-BigInt-1.999707/lib/Math/BigInt.pm
new/Math-BigInt-1.999708/lib/Math/BigInt.pm
--- old/Math-BigInt-1.999707/lib/Math/BigInt.pm 2015-10-29 16:34:12.000000000
+0100
+++ new/Math-BigInt-1.999708/lib/Math/BigInt.pm 2015-10-30 15:33:01.000000000
+0100
@@ -19,7 +19,7 @@
use strict;
use warnings;
-our $VERSION = '1.999707';
+our $VERSION = '1.999708';
our @ISA = qw(Exporter);
our @EXPORT_OK = qw(objectify bgcd blcm);
@@ -887,7 +887,7 @@
# This procedure finds the round parameters, but it is for speed reasons
# duplicated in round. Otherwise, it is tested by the testsuite and used
- # by fdiv().
+ # by bdiv().
# returns ($self) or ($self,$a,$p,$r) - sets $self to NaN of both A and P
# were requested/defined (locally or globally or both)
@@ -1003,7 +1003,7 @@
require Carp; Carp::croak ("Unknown round mode '$r'");
}
- # now round, by calling either fround or ffround:
+ # now round, by calling either bround or bfround:
if (defined $a)
{
$self->bround(int($a),$r) if !defined $self->{_a} || $self->{_a} >= $a;
@@ -4605,21 +4605,21 @@
=item Precision
- * ffround($p) is able to round to $p number of digits after the decimal
+ * bfround($p) is able to round to $p number of digits after the decimal
point
* otherwise P is unused
=item Accuracy (significant digits)
- * fround($a) rounds to $a significant digits
- * only fdiv() and fsqrt() take A as (optional) parameter
- + other operations simply create the same number (fneg etc), or
- more (fmul) of digits
+ * bround($a) rounds to $a significant digits
+ * only bdiv() and bsqrt() take A as (optional) parameter
+ + other operations simply create the same number (bneg etc), or
+ more (bmul) of digits
+ rounding/truncating is only done when explicitly calling one
- of fround or ffround, and never for BigInt (not implemented)
- * fsqrt() simply hands its accuracy argument over to fdiv.
+ of bround or bfround, and never for BigInt (not implemented)
+ * bsqrt() simply hands its accuracy argument over to bdiv.
* the documentation and the comment in the code indicate two
- different ways on how fdiv() determines the maximum number
+ different ways on how bdiv() determines the maximum number
of digits it should calculate, and the actual code does yet
another thing
POD:
@@ -4717,22 +4717,22 @@
effect, and the other P, this results in an error (NaN).
* A takes precedence over P (Hint: A comes before P).
If neither of them is defined, nothing is used, i.e. the result will have
- as many digits as it can (with an exception for fdiv/fsqrt) and will not
+ as many digits as it can (with an exception for bdiv/bsqrt) and will not
be rounded.
- * There is another setting for fdiv() (and thus for fsqrt()). If neither of
- A or P is defined, fdiv() will use a fallback (F) of $div_scale digits.
+ * There is another setting for bdiv() (and thus for bsqrt()). If neither of
+ A or P is defined, bdiv() will use a fallback (F) of $div_scale digits.
If either the dividend's or the divisor's mantissa has more digits than
the value of F, the higher value will be used instead of F.
This is to limit the digits (A) of the result (just consider what would
happen with unlimited A and P in the case of 1/3 :-)
- * fdiv will calculate (at least) 4 more digits than required (determined by
+ * bdiv will calculate (at least) 4 more digits than required (determined by
A, P or F), and, if F is not used, round the result
(this will still fail in the case of a result like 0.12345000000001 with A
or P of 5, but this can not be helped - or can it?)
* Thus you can have the math done by on Math::Big* class in two modi:
+ never round (this is the default):
This is done by setting A and P to undef. No math operation
- will round the result, with fdiv() and fsqrt() as exceptions to guard
+ will round the result, with bdiv() and bsqrt() as exceptions to guard
against overflows. You must explicitly call bround(), bfround() or
round() (the latter with parameters).
Note: Once you have rounded a number, the settings will 'stick' on it
@@ -4743,7 +4743,7 @@
$x = Math::BigFloat->new(12.34);
$y = Math::BigFloat->new(98.76);
$z = $x * $y; # 1218.6984
- print $x->copy()->fround(3); # 12.3 (but A is now 3!)
+ print $x->copy()->bround(3); # 12.3 (but A is now 3!)
$z = $x * $y; # still 1218.6984, without
# copy would have been 1210!
@@ -4773,7 +4773,7 @@
+ global A
+ global P
+ global F
- * fsqrt() will hand its arguments to fdiv(), as it used to, only now for two
+ * bsqrt() will hand its arguments to bdiv(), as it used to, only now for two
arguments (A and P) instead of one
=item Local settings
@@ -4787,8 +4787,7 @@
=item Rounding
* the rounding routines will use the respective global or local settings.
- fround()/bround() is for accuracy rounding, while ffround()/bfround()
- is for precision
+ bround() is for accuracy rounding, while bfround() is for precision
* the two rounding functions take as the second parameter one of the
following rounding modes (R):
'even', 'odd', '+inf', '-inf', 'zero', 'trunc', 'common'
@@ -4819,7 +4818,7 @@
=item Remarks
* The defaults are set up so that the new code gives the same results as
- the old code (except in a few cases on fdiv):
+ the old code (except in a few cases on bdiv):
+ Both A and P are undefined and thus will not be used for rounding
after each operation.
+ round() is thus a no-op, unless given extra parameters A and P
@@ -4990,20 +4989,20 @@
$y = Math::BigFloat->new(123.456789);
Math::BigFloat->accuracy(4); # no more A than 4
- is ($x->copy()->fround(),123.4); # even rounding
- print $x->copy()->fround(),"\n"; # 123.4
+ is ($x->copy()->bround(),123.4); # even rounding
+ print $x->copy()->bround(),"\n"; # 123.4
Math::BigFloat->round_mode('odd'); # round to odd
- print $x->copy()->fround(),"\n"; # 123.5
+ print $x->copy()->bround(),"\n"; # 123.5
Math::BigFloat->accuracy(5); # no more A than 5
Math::BigFloat->round_mode('odd'); # round to odd
- print $x->copy()->fround(),"\n"; # 123.46
- $y = $x->copy()->fround(4),"\n"; # A = 4: 123.4
+ print $x->copy()->bround(),"\n"; # 123.46
+ $y = $x->copy()->bround(4),"\n"; # A = 4: 123.4
print "$y, ",$y->accuracy(),"\n"; # 123.4, 4
Math::BigFloat->accuracy(undef); # A not important now
Math::BigFloat->precision(2); # P important
print $x->copy()->bnorm(),"\n"; # 123.46
- print $x->copy()->fround(),"\n"; # 123.46
+ print $x->copy()->bround(),"\n"; # 123.46
Examples for converting:
@@ -5617,15 +5616,15 @@
=item *
-Completely rewritten by Tels L<http://bloodgate.com> in 2001-2008.
+Completely rewritten by Tels L<http://bloodgate.com>, 2001-2008.
=item *
-Florian Ragwitz L<fl...@cpan.org>, 2010.
+Florian Ragwitz E<lt>fl...@cpan.orge<gt>, 2010.
=item *
-Peter John Acklam, L<pjack...@online.no>, 2011-.
+Peter John Acklam E<lt>pjack...@online.noe<gt>, 2011-.
=back
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Math-BigInt-1.999707/t/bigfltpm.inc
new/Math-BigInt-1.999708/t/bigfltpm.inc
--- old/Math-BigInt-1.999707/t/bigfltpm.inc 2015-10-28 10:33:41.000000000
+0100
+++ new/Math-BigInt-1.999708/t/bigfltpm.inc 2015-11-02 09:57:21.000000000
+0100
@@ -33,18 +33,18 @@
@args = split(/:/,$_,99); $ans = pop(@args);
}
$try = "\$x = $class->new(\"$args[0]\");";
- if ($f eq "fnorm")
+ if ($f eq "bnorm")
{
$try .= "\$x;";
- } elsif ($f eq "finf") {
- $try .= "\$x->finf('$args[1]');";
+ } elsif ($f eq "binf") {
+ $try .= "\$x->binf('$args[1]');";
} elsif ($f eq "is_inf") {
$try .= "\$x->is_inf('$args[1]');";
- } elsif ($f eq "fone") {
+ } elsif ($f eq "bone") {
$try .= "\$x->bone('$args[1]');";
- } elsif ($f eq "fstr") {
+ } elsif ($f eq "bstr") {
$try .= "\$x->accuracy($args[1]); \$x->precision($args[2]);";
- $try .= '$x->fstr();';
+ $try .= '$x->bstr();';
} elsif ($f eq "parts") {
# ->bstr() to see if an object is returned
$try .= '($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr();';
@@ -57,9 +57,9 @@
$try .= '$x->mantissa()->bstr();';
} elsif ($f =~ /^(numify|length|as_number|as_hex|as_bin)$/) {
$try .= "\$x->$f();";
- # some unary ops (test the fxxx form, since that is done by AUTOLOAD)
- } elsif ($f =~ /^f(nan|sstr|neg|floor|ceil|int|abs)$/) {
- $try .= "\$x->f$1();";
+ # some unary ops
+ } elsif ($f =~ /^b(nan|sstr|neg|floor|ceil|int|abs)$/) {
+ $try .= "\$x->$f();";
# overloaded functions
} elsif ($f =~ /^(log|exp|sin|cos|atan2|int|neg|abs|sqrt)$/) {
$try .= "\$x = $f(\$x);";
@@ -68,27 +68,27 @@
$try .= "\$x->$f();";
} elsif ($f eq "bpi") {
$try .= '$class->bpi($x);';
- } elsif ($f eq "finc") {
+ } elsif ($f eq "binc") {
$try .= '++$x;';
- } elsif ($f eq "fdec") {
+ } elsif ($f eq "bdec") {
$try .= '--$x;';
- }elsif ($f eq "fround") {
- $try .= "$setup; \$x->fround($args[1]);";
- } elsif ($f eq "ffround") {
- $try .= "$setup; \$x->ffround($args[1]);";
- } elsif ($f eq "fsqrt") {
- $try .= "$setup; \$x->fsqrt();";
- } elsif ($f eq "ffac") {
- $try .= "$setup; \$x->ffac();";
- } elsif ($f eq "flog") {
+ }elsif ($f eq "bround") {
+ $try .= "$setup; \$x->bround($args[1]);";
+ } elsif ($f eq "bfround") {
+ $try .= "$setup; \$x->bfround($args[1]);";
+ } elsif ($f eq "bsqrt") {
+ $try .= "$setup; \$x->bsqrt();";
+ } elsif ($f eq "bfac") {
+ $try .= "$setup; \$x->bfac();";
+ } elsif ($f eq "blog") {
if (defined $args[1] && $args[1] ne '')
{
$try .= "\$y = $class->new($args[1]);";
- $try .= "$setup; \$x->flog(\$y);";
+ $try .= "$setup; \$x->blog(\$y);";
}
else
{
- $try .= "$setup; \$x->flog();";
+ $try .= "$setup; \$x->blog();";
}
}
else
@@ -114,11 +114,11 @@
$try .= "$class\::blcm(\$x, \$y";
$try .= ", \$z" if (defined $args[2]);
$try .= " );";
- } elsif ($f eq "fcmp") {
- $try .= '$x->fcmp($y);';
- } elsif ($f eq "facmp") {
- $try .= '$x->facmp($y);';
- } elsif ($f eq "fpow") {
+ } elsif ($f eq "bcmp") {
+ $try .= '$x->bcmp($y);';
+ } elsif ($f eq "bacmp") {
+ $try .= '$x->bacmp($y);';
+ } elsif ($f eq "bpow") {
$try .= '$x ** $y;';
} elsif ($f eq "bnok") {
$try .= '$x->bnok($y);';
@@ -128,23 +128,23 @@
$try .= '$x->bsin($y);';
} elsif ($f eq "batan") {
$try .= '$x->batan($y);';
- } elsif ($f eq "froot") {
- $try .= "$setup; \$x->froot(\$y);";
- } elsif ($f eq "fadd") {
+ } elsif ($f eq "broot") {
+ $try .= "$setup; \$x->broot(\$y);";
+ } elsif ($f eq "badd") {
$try .= '$x + $y;';
- } elsif ($f eq "fsub") {
+ } elsif ($f eq "bsub") {
$try .= '$x - $y;';
- } elsif ($f eq "fmul") {
+ } elsif ($f eq "bmul") {
$try .= '$x * $y;';
- } elsif ($f eq "fdiv") {
+ } elsif ($f eq "bdiv") {
$try .= "$setup; \$x / \$y;";
- } elsif ($f eq "fdiv-list") {
- $try .= "$setup; join(',',\$x->fdiv(\$y));";
- } elsif ($f eq "frsft") {
+ } elsif ($f eq "bdiv-list") {
+ $try .= "$setup; join(',',\$x->bdiv(\$y));";
+ } elsif ($f eq "brsft") {
$try .= '$x >> $y;';
- } elsif ($f eq "flsft") {
+ } elsif ($f eq "blsft") {
$try .= '$x << $y;';
- } elsif ($f eq "fmod") {
+ } elsif ($f eq "bmod") {
$try .= '$x % $y;';
} else {
# Functions with three arguments
@@ -233,23 +233,23 @@
###############################################################################
# zero,inf,one,nan
-$x = $class->new(2); $x->fzero(); is ($x->{_a}, undef); is ($x->{_p}, undef);
-$x = $class->new(2); $x->finf(); is ($x->{_a}, undef); is ($x->{_p}, undef);
-$x = $class->new(2); $x->fone(); is ($x->{_a}, undef); is ($x->{_p}, undef);
-$x = $class->new(2); $x->fnan(); is ($x->{_a}, undef); is ($x->{_p}, undef);
+$x = $class->new(2); $x->bzero(); is ($x->{_a}, undef); is ($x->{_p}, undef);
+$x = $class->new(2); $x->binf(); is ($x->{_a}, undef); is ($x->{_p}, undef);
+$x = $class->new(2); $x->bone(); is ($x->{_a}, undef); is ($x->{_p}, undef);
+$x = $class->new(2); $x->bnan(); is ($x->{_a}, undef); is ($x->{_p}, undef);
###############################################################################
# bone/binf etc as plain calls (Lite failed them)
-is ($class->fzero(),0);
-is ($class->fone(),1);
-is ($class->fone('+'),1);
-is ($class->fone('-'),-1);
-is ($class->fnan(),'NaN');
-is ($class->finf(),'inf');
-is ($class->finf('+'),'inf');
-is ($class->finf('-'),'-inf');
-is ($class->finf('-inf'),'-inf');
+is ($class->bzero(),0);
+is ($class->bone(),1);
+is ($class->bone('+'),1);
+is ($class->bone('-'),-1);
+is ($class->bnan(),'NaN');
+is ($class->binf(),'inf');
+is ($class->binf('+'),'inf');
+is ($class->binf('-'),'-inf');
+is ($class->binf('-inf'),'-inf');
$class->accuracy(undef); $class->precision(undef); # reset
@@ -272,7 +272,8 @@
# Check numify on non-finite objects.
{
- my $inf = 1e99 ** 1e99;
+ require Math::Complex;
+ my $inf = Math::Complex::Inf();
my $nan = $inf - $inf;
is($class -> binf("+") -> numify(), $inf, "numify of +Inf");
is($class -> binf("-") -> numify(), -$inf, "numify of -Inf");
@@ -280,24 +281,24 @@
}
###############################################################################
-# fsqrt() with set global A/P or A/P enabled on $x, also a test whether fsqrt()
+# bsqrt() with set global A/P or A/P enabled on $x, also a test whether bsqrt()
# correctly modifies $x
-$x = $class->new(12); $class->precision(-2); $x->fsqrt(); is ($x,'3.46');
+$x = $class->new(12); $class->precision(-2); $x->bsqrt(); is ($x,'3.46');
$class->precision(undef);
-$x = $class->new(12); $class->precision(0); $x->fsqrt(); is ($x,'3');
+$x = $class->new(12); $class->precision(0); $x->bsqrt(); is ($x,'3');
-$class->precision(-3); $x = $class->new(12); $x->fsqrt(); is ($x,'3.464');
+$class->precision(-3); $x = $class->new(12); $x->bsqrt(); is ($x,'3.464');
{
no strict 'refs';
# A and P set => NaN
${${class}.'::accuracy'} = 4; $x = $class->new(12);
- $x->fsqrt(3); is ($x,'NaN');
+ $x->bsqrt(3); is ($x,'NaN');
# supplied arg overrides set global
- $class->precision(undef); $x = $class->new(12); $x->fsqrt(3); is ($x,'3.46');
+ $class->precision(undef); $x = $class->new(12); $x->bsqrt(3); is ($x,'3.46');
$class->accuracy(undef); $class->precision(undef); # reset for further tests
}
@@ -321,7 +322,7 @@
#############################################################################
# bug 1/0.5 leaving 2e-0 instead of 2e0
-is ($class->new(1)->fdiv('0.5')->bsstr(),'2e+0');
+is ($class->new(1)->bdiv('0.5')->bsstr(),'2e+0');
###############################################################################
# [perl #30609] bug with $x -= $x not being 0, but 2*$x
@@ -512,7 +513,7 @@
2:0:1
7:0:1
2:1:2
-&flog
+&blog
0::-inf
-1::NaN
-2::NaN
@@ -543,25 +544,25 @@
# reset for further tests
$div_scale = 40;
1::0
-&frsft
-NaNfrsft:2:NaN
+&brsft
+NaNbrsft:2:NaN
0:2:0
1:1:0.5
2:1:1
4:1:2
123:1:61.5
32:3:4
-&flsft
-NaNflsft:0:NaN
+&blsft
+NaNblsft:0:NaN
2:1:4
4:3:32
5:3:40
1:2:4
0:5:0
-&fnorm
+&bnorm
1:1
-0:0
-fnormNaN:NaN
+bnormNaN:NaN
+inf:inf
-inf:-inf
123:123
@@ -639,7 +640,7 @@
0.1234567:0
0.12345678:0
0.123456789:0
-&finf
+&binf
1:+:inf
2:-:-inf
3:abc:inf
@@ -665,12 +666,12 @@
-5:-5
100:100
-100:-100
-&fnan
+&bnan
abc:NaN
2:NaN
-2:NaN
0:NaN
-&fone
+&bone
2:+:1
-2:-:-1
-2:+:1
@@ -679,7 +680,7 @@
-2::1
abc::1
2:abc:1
-&fsstr
+&bsstr
+inf:inf
-inf:-inf
abcfsstr:NaN
@@ -688,7 +689,7 @@
123:123e+0
-5:-5e+0
-100:-1e+2
-&fstr
+&bstr
+inf:::inf
-inf:::-inf
abcfstr:::NaN
@@ -699,7 +700,7 @@
0.001234::-8:0.00123400
0:4::0
0::-4:0.0000
-&fnorm
+&bnorm
inf:inf
+inf:inf
-inf:-inf
@@ -755,7 +756,7 @@
1.1e1:11
-3e111:-3000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
-4e-1111:-0.0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000004
-&fpow
+&bpow
NaN:1:NaN
1:NaN:NaN
NaN:-1:NaN
@@ -799,8 +800,8 @@
$div_scale = 20;
#62.5:12.5:26447206647554886213592.3959144
$div_scale = 40;
-&fneg
-fnegNaN:NaN
+&bneg
+bnegNaN:NaN
+inf:-inf
-inf:inf
+0:0
@@ -810,8 +811,8 @@
-123456789:123456789
+123.456789:-123.456789
-123456.789:123456.789
-&fabs
-fabsNaN:NaN
+&babs
+babsNaN:NaN
+inf:inf
-inf:inf
+0:0
@@ -821,7 +822,7 @@
-123456789:123456789
+123.456789:123.456789
-123456.789:123456.789
-&fround
+&bround
$round_mode = "trunc"
+inf:5:inf
-inf:5:-inf
@@ -896,7 +897,7 @@
+601234300:6:601234000
+60123456789.0123:5:60123000000
-60123456789.0123:5:-60123000000
-&ffround
+&bfround
$round_mode = "trunc"
+inf:5:inf
-inf:5:-inf
@@ -1031,10 +1032,10 @@
0.01234567:-8:0.01234567
0.01234567:-9:0.012345670
0.01234567:-12:0.012345670000
-&fcmp
-fcmpNaN:fcmpNaN:
-fcmpNaN:+0:
-+0:fcmpNaN:
+&bcmp
+bcmpNaN:bcmpNaN:
+bcmpNaN:+0:
++0:bcmpNaN:
+0:+0:0
-1:+0:-1
+0:-1:1
@@ -1103,10 +1104,10 @@
NaN:inf:
-inf:NaN:
NaN:-inf:
-&facmp
-fcmpNaN:fcmpNaN:
-fcmpNaN:+0:
-+0:fcmpNaN:
+&bacmp
+bcmpNaN:bcmpNaN:
+bcmpNaN:+0:
++0:bcmpNaN:
+0:+0:0
-1:+0:1
+0:-1:-1
@@ -1173,12 +1174,12 @@
5:-inf:-1
-1:-inf:-1
# return undef
-+inf:facmpNaN:
-facmpNaN:inf:
--inf:facmpNaN:
-facmpNaN:-inf:
-&fdec
-fdecNaN:NaN
++inf:bacmpNaN:
+bacmpNaN:inf:
+-inf:bacmpNaN:
+bacmpNaN:-inf:
+&bdec
+bdecNaN:NaN
+inf:inf
-inf:-inf
+0:-1
@@ -1192,8 +1193,8 @@
-99:-100
-98:-99
99:98
-&finc
-fincNaN:NaN
+&binc
+bincNaN:NaN
+inf:inf
-inf:-inf
+0:1
@@ -1206,7 +1207,7 @@
-99:-98
-101:-100
99:100
-&fadd
+&badd
abc:abc:NaN
abc:+0:NaN
+0:abc:NaN
@@ -1253,7 +1254,7 @@
-123456789:-987654321:-1111111110
+123456789:-987654321:-864197532
0.001234:0.0001234:0.0013574
-&fsub
+&bsub
abc:abc:NaN
abc:+0:NaN
+0:abc:NaN
@@ -1366,7 +1367,7 @@
3:4:7:4
77777:777:123456789:99995084
3.2:6.2:5.2:2.970579856718063040273642739529400818
-&fmul
+&bmul
abc:abc:NaN
abc:+0:NaN
+0:abc:NaN
@@ -1417,7 +1418,7 @@
+99999999999:+9:899999999991
6:120:720
10:10000:100000
-&fdiv-list
+&bdiv-list
0:0:NaN,0
0:1:0,0
9:4:2,1
@@ -1427,7 +1428,7 @@
2.1:1:2.1,0
-2.1:-1:2.1,0
-2.1:1:-2.1,0
-&fdiv
+&bdiv
$div_scale = 40; $round_mode = 'even'
abc:abc:NaN
abc:+1:abc:NaN
@@ -1504,7 +1505,7 @@
123456789.1234:1:100000000
# reset scale for further tests
$div_scale = 40
-&fmod
+&bmod
+9:4:1
+9:5:4
+9000:56:40
@@ -1594,7 +1595,7 @@
3:1:0
-3:-1:0
3:-1:0
-&ffac
+&bfac
Nanfac:NaN
-1:NaN
+inf:inf
@@ -1609,12 +1610,12 @@
10:3628800
11:39916800
12:479001600
-&froot
+&broot
# sqrt()
+0:2:0
+1:2:1
-1:2:NaN
-# -$x ** (1/2) => -$y, but not in froot()
+# -$x ** (1/2) => -$y, but not in broot()
-123.456:2:NaN
+inf:2:inf
-inf:2:NaN
@@ -1659,13 +1660,13 @@
16:4:2
81:4:3
# see t/bigroot() for more tests
-&fsqrt
+&bsqrt
+0:0
-1:NaN
-2:NaN
-16:NaN
-123.45:NaN
-nanfsqrt:NaN
+nanbsqrt:NaN
+inf:inf
-inf:NaN
1:1
@@ -1814,7 +1815,7 @@
1:1
-1:0
-2:0
-&ffloor
+&bfloor
0:0
abc:NaN
+inf:inf
@@ -1828,7 +1829,7 @@
0.1234567:0
0.12345678:0
0.123456789:0
-&fceil
+&bceil
0:0
abc:NaN
+inf:inf
@@ -1838,7 +1839,7 @@
-51.2:-51
12.2:13
-0.4:0
-&fint
+&bint
0:0
NaN:NaN
+inf:inf
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Math-BigInt-1.999707/t/bigfltpm.t
new/Math-BigInt-1.999708/t/bigfltpm.t
--- old/Math-BigInt-1.999707/t/bigfltpm.t 2015-10-28 10:47:56.000000000
+0100
+++ new/Math-BigInt-1.999708/t/bigfltpm.t 2015-10-30 13:42:19.000000000
+0100
@@ -17,7 +17,7 @@
# bug #17447: Can't call method Math::BigFloat->bsub, not a valid method
my $c = Math::BigFloat->new( '123.3' );
-is ($c->fsub(123), '0.3'); # calling fsub on a BigFloat works
+is ($c->bsub(123), '0.3'); # calling bsub on a BigFloat works
# Bug until BigInt v1.86, the scale wasn't treated as a scalar:
$c = Math::BigFloat->new('0.008'); my $d = Math::BigFloat->new(3);
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Math-BigInt-1.999707/t/bigintpm.inc
new/Math-BigInt-1.999708/t/bigintpm.inc
--- old/Math-BigInt-1.999707/t/bigintpm.inc 2015-10-28 10:46:10.000000000
+0100
+++ new/Math-BigInt-1.999708/t/bigintpm.inc 2015-11-02 09:57:21.000000000
+0100
@@ -523,7 +523,8 @@
# Check numify on non-finite objects.
{
- my $inf = 1e99 ** 1e99;
+ require Math::Complex;
+ my $inf = Math::Complex::Inf();
my $nan = $inf - $inf;
is($class -> binf("+") -> numify(), $inf, "numify of +Inf");
is($class -> binf("-") -> numify(), -$inf, "numify of -Inf");
@@ -2432,7 +2433,7 @@
+0:2:0
+1:2:1
-1:2:NaN
-# -$x ** (1/2) => -$y, but not in froot()
+# -$x ** (1/2) => -$y, but not in broot()
-123:2:NaN
+inf:2:inf
-inf:2:NaN
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Math-BigInt-1.999707/t/mbimbf.inc
new/Math-BigInt-1.999708/t/mbimbf.inc
--- old/Math-BigInt-1.999707/t/mbimbf.inc 2011-03-10 16:31:42.000000000
+0100
+++ new/Math-BigInt-1.999708/t/mbimbf.inc 2015-10-30 13:42:19.000000000
+0100
@@ -316,9 +316,9 @@
$x = $mbi->new(-123401); $x->{_a} = 4; is ($x->babs(),123401);
$x = $mbi->new(-123401); $x->{_a} = 4; is ($x->bneg(),123401);
-# test fdiv rounding to A and R (bug in v1.48 and maybe earlier versions)
+# test bdiv rounding to A and R (bug in v1.48 and maybe earlier versions)
$mbf->round_mode('even');
-$x = $mbf->new('740.7')->fdiv('6',4,undef,'zero'); is ($x,'123.4');
+$x = $mbf->new('740.7')->bdiv('6',4,undef,'zero'); is ($x,'123.4');
$x = $mbi->new('123456'); $y = $mbi->new('123456'); $y->{_a} = 6;
is ($x->bdiv($y),1); is ($x->{_a},6); # carried over
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Math-BigInt-1.999707/t/mbimbf.t
new/Math-BigInt-1.999708/t/mbimbf.t
--- old/Math-BigInt-1.999707/t/mbimbf.t 2015-09-08 19:58:46.000000000 +0200
+++ new/Math-BigInt-1.999708/t/mbimbf.t 2015-10-30 13:42:19.000000000 +0100
@@ -63,7 +63,7 @@
$class->accuracy(undef); # reset for further tests
$class->precision(undef);
}
-# bug with flog(Math::BigFloat,Math::BigInt)
+# bug with blog(Math::BigFloat,Math::BigInt)
$x = Math::BigFloat->new(100);
$x = $x->blog(Math::BigInt->new(10));
