Integrate against change 9670 aka perl-5.7.1

[p5sagit/p5-mst-13.2.git] / lib / Math / BigInt.pm

diff --git a/lib/Math/BigInt.pm b/lib/Math/BigInt.pm
index 066577d..839b746 100644 (file)
--- a/lib/Math/BigInt.pm
+++ b/lib/Math/BigInt.pm
@@ -25,6 +25,7 @@ use overload
 '|'    =>      sub {new Math::BigInt &bior},
 '^'    =>      sub {new Math::BigInt &bxor},
 '~'    =>      sub {new Math::BigInt &bnot},
+'int'  =>      sub { shift },
 
 qw(
 ""     stringify