summaryrefslogtreecommitdiff
path: root/dist/Math-BigInt-FastCalc
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2010-10-28 19:10:17 +0100
committerNicholas Clark <nick@ccl4.org>2010-10-29 14:42:41 +0100
commit4dd6c65fbede48f7d20b2635d98243597695527c (patch)
tree04f58fdd8402e289a243e706376053442c67156a /dist/Math-BigInt-FastCalc
parentc0fdee650ccddaa4a1d2adf7745aed02dbb0a602 (diff)
downloadperl-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/Math-BigInt-FastCalc')
-rw-r--r--dist/Math-BigInt-FastCalc/FastCalc.pm7
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);