summaryrefslogtreecommitdiff
path: root/src/tools/msvc/VCBuildProject.pm
diff options
context:
space:
mode:
authorAndrew Dunstan2018-05-31 12:13:02 +0000
committerAndrew Dunstan2018-05-31 12:13:02 +0000
commit0039049fb1d76afef05d550823b27731ad7d7b3d (patch)
treee1885702d5dcde46e0108dbb1cbc257d334eb90e /src/tools/msvc/VCBuildProject.pm
parentd3b10f0d64e90e9c78b8adc24ab3e38b30ef60bd (diff)
Fix compile-time warnings on all perl code
This patch does two things. First, it silences a number of compile-time warnings in the msvc tools files, mainly those due to the fact that in some cases we have more than one package per file. Second it supplies a dummy Perl library with just enough of the Windows API referred to in our code to let it run these checks cleanly, even on Unix machines where the code is never supposed to run. The dummy library should only be used for that purpose, as its README notes.
Diffstat (limited to 'src/tools/msvc/VCBuildProject.pm')
-rw-r--r--src/tools/msvc/VCBuildProject.pm6
1 files changed, 6 insertions, 0 deletions
diff --git a/src/tools/msvc/VCBuildProject.pm b/src/tools/msvc/VCBuildProject.pm
index 03b890b9b74..09152b2bbc4 100644
--- a/src/tools/msvc/VCBuildProject.pm
+++ b/src/tools/msvc/VCBuildProject.pm
@@ -11,6 +11,8 @@ use strict;
use warnings;
use base qw(Project);
+no warnings qw(redefine); ## no critic
+
sub _new
{
my $classname = shift;
@@ -268,6 +270,8 @@ use strict;
use warnings;
use base qw(VCBuildProject);
+no warnings qw(redefine); ## no critic
+
sub new
{
my $classname = shift;
@@ -289,6 +293,8 @@ use strict;
use warnings;
use base qw(VCBuildProject);
+no warnings qw(redefine); ## no critic
+
sub new
{
my $classname = shift;