diff options
| author | Father Chrysostomos <sprout@cpan.org> | 2012-10-04 09:37:26 -0700 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2012-10-04 09:37:59 -0700 |
| commit | 6aa4fbb50135d4863535200030aadfeb8c583c6e (patch) | |
| tree | 9f42ac4f64a067aee2050f98b860df24bd238228 | |
| parent | 9f275339d46b79cc64e0475bd96a56295e679eb2 (diff) | |
| download | perl-6aa4fbb50135d4863535200030aadfeb8c583c6e.tar.gz | |
bignum: Suppress warnings under 5.6
5.6 does not like it when a sub is declared with a prototype after a
reference to it has been taken.
5.6 does not think lowercase module names should be exempt from
reserved word warnings before ->.
| -rw-r--r-- | dist/bignum/lib/bignum.pm | 2 | ||||
| -rw-r--r-- | dist/bignum/lib/bigrat.pm | 2 | ||||
| -rw-r--r-- | dist/bignum/t/bigint.t | 18 |
3 files changed, 11 insertions, 11 deletions
diff --git a/dist/bignum/lib/bignum.pm b/dist/bignum/lib/bignum.pm index accf0abfb9..8b05dc9b02 100644 --- a/dist/bignum/lib/bignum.pm +++ b/dist/bignum/lib/bignum.pm @@ -9,7 +9,7 @@ use Exporter; use strict; use overload; -require bigint; # no "use" to avoid import being called +use bigint (); ############################################################################## diff --git a/dist/bignum/lib/bigrat.pm b/dist/bignum/lib/bigrat.pm index 496a07a748..c1649358be 100644 --- a/dist/bignum/lib/bigrat.pm +++ b/dist/bignum/lib/bigrat.pm @@ -9,7 +9,7 @@ require Exporter; use strict; use overload; -require bigint; # no "use" to avoid callind import +use bigint (); ############################################################################## diff --git a/dist/bignum/t/bigint.t b/dist/bignum/t/bigint.t index 431a6a668c..e2df70e1bd 100644 --- a/dist/bignum/t/bigint.t +++ b/dist/bignum/t/bigint.t @@ -66,17 +66,17 @@ like (ref(4.5+4.5), qr/^Math::BigInt/); ############################################################################### # accuracy and precision -is (bigint->accuracy(), undef); -is (bigint->accuracy(12),12); -is (bigint->accuracy(),12); +is ('bigint'->accuracy(), undef); +is ('bigint'->accuracy(12),12); +is ('bigint'->accuracy(),12); -is (bigint->precision(), undef); -is (bigint->precision(12),12); -is (bigint->precision(),12); +is ('bigint'->precision(), undef); +is ('bigint'->precision(12),12); +is ('bigint'->precision(),12); -is (bigint->round_mode(),'even'); -is (bigint->round_mode('odd'),'odd'); -is (bigint->round_mode(),'odd'); +is ('bigint'->round_mode(),'even'); +is ('bigint'->round_mode('odd'),'odd'); +is ('bigint'->round_mode(),'odd'); ############################################################################### # hex() and oct() |