diff options
author | Nicholas Clark <nick@ccl4.org> | 2010-10-28 19:10:17 +0100 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2010-10-29 14:42:41 +0100 |
commit | 4dd6c65fbede48f7d20b2635d98243597695527c (patch) | |
tree | 04f58fdd8402e289a243e706376053442c67156a /dist | |
parent | c0fdee650ccddaa4a1d2adf7745aed02dbb0a602 (diff) | |
download | perl-4dd6c65fbede48f7d20b2635d98243597695527c.tar.gz |
Math::BigInt::FastCalc doesn't need to override methods in a BEGIN block.
The BEGIN context of the code C<use>ing it will be early enough for the
subroutine assignments to take full effect.
Diffstat (limited to 'dist')
-rw-r--r-- | dist/Math-BigInt-FastCalc/FastCalc.pm | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/dist/Math-BigInt-FastCalc/FastCalc.pm b/dist/Math-BigInt-FastCalc/FastCalc.pm index bc7ab94f41..f044132d14 100644 --- a/dist/Math-BigInt-FastCalc/FastCalc.pm +++ b/dist/Math-BigInt-FastCalc/FastCalc.pm @@ -16,11 +16,9 @@ $VERSION = '0.24'; # announce that we are compatible with MBI v1.70 and up sub api_version () { 1; } -BEGIN - { - # use Calc to override the methods that we do not provide in XS +# use Calc to override the methods that we do not provide in XS - for my $method (qw/ +for my $method (qw/ str add sub mul div rsft lsft @@ -39,7 +37,6 @@ BEGIN } ($BASE_LEN, $BASE) = Math::BigInt::Calc::_base_len(); - } require XSLoader; XSLoader::load(__PACKAGE__, $VERSION, $BASE_LEN, $BASE); |