diff options
| author | Craig A. Berry <craigberry@mac.com> | 2002-05-31 12:20:11 -0500 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-05-31 22:08:03 +0000 |
| commit | b05afeb3d8db159a55828668ece0abbdf3ee663a (patch) | |
| tree | 97b0b1f22200dbad14ce90e9fe015e5281490e23 /lib | |
| parent | d5201bd266fe42b2df8b480183c08be291a1ad06 (diff) | |
| download | perl-b05afeb3d8db159a55828668ece0abbdf3ee663a.tar.gz | |
lib/Math/BigInt/t/bigintc.t + VMS + perl@16925
From: "Craig A. Berry" <craigberry@mac.com>
Message-Id: <a05111b01b91da6015790@[172.16.52.1]>
Avoid redef warning.
p4raw-id: //depot/perl@16943
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/Math/BigInt/Calc.pm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lib/Math/BigInt/Calc.pm b/lib/Math/BigInt/Calc.pm index a2fe8123e4..a114d09ee8 100644 --- a/lib/Math/BigInt/Calc.pm +++ b/lib/Math/BigInt/Calc.pm @@ -72,6 +72,8 @@ sub _base_len #print "BASE_LEN: $BASE_LEN MAX_VAL: $MAX_VAL BASE: $BASE RBASE: $RBASE "; #print "BASE_LEN_SMALL: $BASE_LEN_SMALL MBASE: $MBASE\n"; + undef &_mul; + undef &_div; if ($caught & 1 != 0) { # must USE_MUL |