Change 31480 by [EMAIL PROTECTED] on 2007/06/27 13:02:02

        Add an empty prototype to functions PI and e

Affected files ...

... //depot/perl/lib/bigint.pm#19 edit
... //depot/perl/lib/bignum.pm#20 edit
... //depot/perl/lib/bigrat.pm#17 edit

Differences ...

==== //depot/perl/lib/bigint.pm#19 (text) ====
Index: perl/lib/bigint.pm
--- perl/lib/bigint.pm#18~31479~        2007-06-27 05:57:52.000000000 -0700
+++ perl/lib/bigint.pm  2007-06-27 06:02:02.000000000 -0700
@@ -280,8 +280,8 @@
 
 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;
 

==== //depot/perl/lib/bignum.pm#20 (text) ====
Index: perl/lib/bignum.pm
--- perl/lib/bignum.pm#19~31479~        2007-06-27 05:57:52.000000000 -0700
+++ perl/lib/bignum.pm  2007-06-27 06:02:02.000000000 -0700
@@ -240,8 +240,8 @@
   }
   }
 
-sub PI { Math::BigFloat::bpi(@_); }
-sub e  { Math::BigFloat->bone->bexp(@_); }
+sub PI () { Math::BigFloat::bpi(@_); }
+sub e  () { Math::BigFloat->bone->bexp(@_); }
 
 1;
 

==== //depot/perl/lib/bigrat.pm#17 (text) ====
Index: perl/lib/bigrat.pm
--- perl/lib/bigrat.pm#16~31479~        2007-06-27 05:57:52.000000000 -0700
+++ perl/lib/bigrat.pm  2007-06-27 06:02:02.000000000 -0700
@@ -226,8 +226,8 @@
   }
   }
 
-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;
 
End of Patch.

Reply via email to