diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2002-06-09 22:59:54 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-06-09 22:59:54 +0000 |
| commit | dca3595e9116d32137bd00173dc4490671e63206 (patch) | |
| tree | 15a9a1d5249150c2b24c4b92ff0db7ca62fed806 /t | |
| parent | 6e3dd797c11bfbcd0b6afff17d355b401f2f8429 (diff) | |
| download | perl-dca3595e9116d32137bd00173dc4490671e63206.tar.gz | |
One missing bit of Math::BigInt 1.58.
p4raw-id: //depot/perl@17151
Diffstat (limited to 't')
| -rw-r--r-- | t/lib/Math/BigInt/BareCalc.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/t/lib/Math/BigInt/BareCalc.pm b/t/lib/Math/BigInt/BareCalc.pm index 7c56c4eb70..797957f748 100644 --- a/t/lib/Math/BigInt/BareCalc.pm +++ b/t/lib/Math/BigInt/BareCalc.pm @@ -14,10 +14,11 @@ $VERSION = '0.02'; # uses Calc, but only features the strictly necc. methods. -use Math::BigInt::Calc '0.18'; +use Math::BigInt::Calc '0.29'; BEGIN { + no strict 'refs'; foreach (qw/ base_len new zero one two copy str num add sub mul div inc dec acmp len digit zeros is_zero is_one is_odd is_even is_one check @@ -25,7 +26,6 @@ BEGIN /) { my $name = "Math::BigInt::Calc::_$_"; - no strict 'refs'; *{"Math::BigInt::BareCalc::_$_"} = \&$name; } } |