diff options
| author | Tels <nospam-abuse@bloodgate.com> | 2005-04-03 12:43:10 +0200 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-04-05 10:40:35 +0000 |
| commit | 233f7bc03a8f0557d08657ec772040b570b403cd (patch) | |
| tree | 79d51b536240e85541715cab4dfd5099e0bd29b5 /lib/bigint.pm | |
| parent | 43e4f2c68f8de551ce4632b5fbfb077a650c967e (diff) | |
| download | perl-233f7bc03a8f0557d08657ec772040b570b403cd.tar.gz | |
[Patch] Math::BigInt v1.76, Math::BigRat v0.15, bignum v0.17
Message-Id: <200504031043.12273@bloodgate.com>
p4raw-id: //depot/perl@24155
Diffstat (limited to 'lib/bigint.pm')
| -rw-r--r-- | lib/bigint.pm | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/lib/bigint.pm b/lib/bigint.pm index 695b4c4bed..a53891af5c 100644 --- a/lib/bigint.pm +++ b/lib/bigint.pm @@ -1,7 +1,7 @@ package bigint; require 5.005; -$VERSION = '0.06'; +$VERSION = '0.07'; use Exporter; @ISA = qw( Exporter ); @EXPORT_OK = qw( ); @@ -102,7 +102,7 @@ sub import my $self = shift; # some defaults - my $lib = 'Calc'; + my $lib = ''; my @import = ( ':constant' ); # drive it w/ constant my @a = @_; my $l = scalar @_; my $j = 0; @@ -162,9 +162,10 @@ sub import } require Math::BigInt if $_lite == 0; # not already loaded? $class = 'Math::BigInt'; # regardless of MBIL or not - } + } + push @import, 'lib' => $lib if $lib ne ''; # Math::BigInt::Trace or plain Math::BigInt - $class->import(@import, lib => $lib); + $class->import(@import); bigint->accuracy($a) if defined $a; bigint->precision($p) if defined $p; |