diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 1998-05-15 01:34:53 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-05-15 01:34:53 +0000 |
| commit | 48c036b1eb8f866b948f33704ee6152323a5aad9 (patch) | |
| tree | 6e91e012efd9b99283cda0a0e070452f8d41eb8a /lib/strict.pm | |
| parent | ee580363108be8ac33155650c6c18d2e5cf051f3 (diff) | |
| download | perl-48c036b1eb8f866b948f33704ee6152323a5aad9.tar.gz | |
[win32] merge change#905 from maintbranch, minor fixes to get
clean build+test on Solaris
p4raw-link: @905 on //depot/maint-5.004/perl: 15e73149a8419f18d739227762eab108524cec56
p4raw-id: //depot/win32/perl@976
Diffstat (limited to 'lib/strict.pm')
| -rw-r--r-- | lib/strict.pm | 8 |
1 files changed, 0 insertions, 8 deletions
diff --git a/lib/strict.pm b/lib/strict.pm index 463b056c7f..940e8bf7ff 100644 --- a/lib/strict.pm +++ b/lib/strict.pm @@ -85,14 +85,6 @@ subs => 0x00000200, vars => 0x00000400 ); -$strict::VERSION = "1.01"; - -my %bitmask = ( -refs => 0x00000002, -subs => 0x00000200, -vars => 0x00000400 -); - sub bits { my $bits = 0; foreach my $s (@_){ $bits |= $bitmask{$s} || 0; }; |