This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
mktables: remove now-always-true test
[perl5.git] / lib / strict.pm
index 43b7ebf..63a89dd 100644 (file)
@@ -15,9 +15,9 @@ subs => 0x00000200,
 vars => 0x00000400
 );
 my %explicit_bitmask = (
-refs => 0x20000000,
-subs => 0x40000000,
-vars => 0x80000000
+refs => 0x00000020,
+subs => 0x00000040,
+vars => 0x00000080
 );
 
 sub bits {