diff options
author | Noah Misch <noah@leadboat.com> | 2020-06-07 16:27:13 -0700 |
---|---|---|
committer | Noah Misch <noah@leadboat.com> | 2020-06-07 16:27:18 -0700 |
commit | f7faf4a5d779cc0883793fab3c1e17ea81e1603b (patch) | |
tree | 99dc4fcb76069882ab2dbc0a1cdbef4c9b6581e0 | |
parent | 6c669003cfdd6814f21b15eabe9bd3d6082bbf79 (diff) |
MSVC: Avoid warning when testing a TAP suite without PROVE_FLAGS.
Commit 7be5d8df1f74b78620167d3abf32ee607e728919 surfaced the logic
error, which had no functional implications, by adding "use warnings".
The buildfarm always customizes PROVE_FLAGS, so the warning did not
appear there. Back-patch to 9.5 (all supported versions).
-rw-r--r-- | src/tools/msvc/vcregress.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/tools/msvc/vcregress.pl b/src/tools/msvc/vcregress.pl index 76c62fabe81..048c5bfaf75 100644 --- a/src/tools/msvc/vcregress.pl +++ b/src/tools/msvc/vcregress.pl @@ -196,7 +196,7 @@ sub tap_check unless $config->{tap_tests}; my @flags; - foreach my $arg (0 .. scalar(@_)) + foreach my $arg (0 .. scalar(@_) - 1) { next unless $_[$arg] =~ /^PROVE_FLAGS=(.*)/; @flags = split(/\s+/, $1); |