Add an empty prototype to functions PI and e

p4raw-id: //depot/perl@31480

diff --git a/lib/bigint.pm b/lib/bigint.pm
index b8a25a3..9a23200 100644 (file)
--- a/lib/bigint.pm
+++ b/lib/bigint.pm
@@ -280,8 +280,8 @@ sub import
 
 sub inf () { Math::BigInt::binf(); }
 sub NaN () { Math::BigInt::bnan(); }
-sub PI { Math::BigInt->new(3); }
-sub e { Math::BigInt->new(2); }
+sub PI  () { Math::BigInt->new(3); }
+sub e   () { Math::BigInt->new(2); }
 
 1;
 

diff --git a/lib/bignum.pm b/lib/bignum.pm
index f8814f9..e9ab3bc 100644 (file)
--- a/lib/bignum.pm
+++ b/lib/bignum.pm
@@ -240,8 +240,8 @@ sub import
   }
   }
 
-sub PI { Math::BigFloat::bpi(@_); }
-sub e  { Math::BigFloat->bone->bexp(@_); }
+sub PI () { Math::BigFloat::bpi(@_); }
+sub e  () { Math::BigFloat->bone->bexp(@_); }
 
 1;
 

diff --git a/lib/bigrat.pm b/lib/bigrat.pm
index e185d4f..b5fb267 100644 (file)
--- a/lib/bigrat.pm
+++ b/lib/bigrat.pm
@@ -226,8 +226,8 @@ sub import
   }
   }
 
-sub PI { local $Math::BigFloat::upgrade = undef; Math::BigFloat::bpi(@_); }
-sub e  { local $Math::BigFloat::upgrade = undef; Math::BigFloat->bone()->bexp(@_); }
+sub PI () { local $Math::BigFloat::upgrade = undef; Math::BigFloat::bpi(@_); }
+sub e  () { local $Math::BigFloat::upgrade = undef; Math::BigFloat->bone()->bexp(@_); }
 
 1;