From dca3595e9116d32137bd00173dc4490671e63206 Mon Sep 17 00:00:00 2001 From: Jarkko Hietaniemi Date: Sun, 9 Jun 2002 22:59:54 +0000 Subject: One missing bit of Math::BigInt 1.58. p4raw-id: //depot/perl@17151 --- t/lib/Math/BigInt/BareCalc.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 't') 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; } } -- cgit v1.2.1