summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorFather Chrysostomos <sprout@cpan.org>2012-01-16 10:04:10 -0800
committerFather Chrysostomos <sprout@cpan.org>2012-01-16 12:51:45 -0800
commit5e0688b6067afdfb59fdfa9923e658ed40c9f246 (patch)
treea2b238871976c5faff799237fe8e4869c2422a7e
parent7778d8049861df5954e61187039e2f815b0b4370 (diff)
downloadperl-5e0688b6067afdfb59fdfa9923e658ed40c9f246.tar.gz
BigInt.pm: Suppress overload warning
BigInt.pm intentionally registered an unregisterable op.
-rw-r--r--dist/Math-BigInt/lib/Math/BigInt.pm3
1 files changed, 3 insertions, 0 deletions
diff --git a/dist/Math-BigInt/lib/Math/BigInt.pm b/dist/Math-BigInt/lib/Math/BigInt.pm
index 0bb8ebae3a..f1ebda45df 100644
--- a/dist/Math-BigInt/lib/Math/BigInt.pm
+++ b/dist/Math-BigInt/lib/Math/BigInt.pm
@@ -40,6 +40,8 @@ use strict;
# Thus inheritance of overload operators becomes possible and transparent for
# our subclasses without the need to repeat the entire overload section there.
+# We register ops that are not registerable yet, so suppress warnings
+{ no warnings;
use overload
'=' => sub { $_[0]->copy(); },
@@ -151,6 +153,7 @@ use overload
'""' => sub { $_[0]->bstr(); },
'0+' => sub { $_[0]->numify(); }
;
+} # no warnings scope
##############################################################################
# global constants, flags and accessory