MSYS: Skip src/test/recovery/t/017_shm.pl.

Commit 947a35014fdc2ec74cbf06c7dbac6eea6fae90c6 relied on a feature
available in v11 and later, so back-patching it to v10 and v9.6 was
invalid.  In those branches, revert it and skip the test on msys.

Discussion: https://postgr.es/m/GrdLgAdUK9FdyZg8VIcTDKVOkys122ZINEb3CjjoySfGj2KyPiMKTh1zqtRp0TAD7FJ27G-OBB3eplxIB5GhcQH5o8zzGZfp0MuJaXJxVxk=@yesql.se

diff --git a/src/test/perl/PostgresNode.pm b/src/test/perl/PostgresNode.pm
index f8e38ab4895426cce7a3a00fd162442f73210e66..fd2a67c8c9e2c66c25789439b9aacf6cd198b271 100644 (file)
--- a/src/test/perl/PostgresNode.pm
+++ b/src/test/perl/PostgresNode.pm
@@ -725,9 +725,7 @@ sub kill9
    my $name = $self->name;
    return unless defined $self->{_pid};
    print "### Killing node \"$name\" using signal 9\n";
-   # kill(9, ...) fails under msys Perl 5.8.8, so fall back on pg_ctl.
-   kill(9, $self->{_pid})
-     or TestLib::system_or_bail('pg_ctl', 'kill', 'KILL', $self->{_pid});
+   kill(9, $self->{_pid}) or BAIL_OUT("kill(9, $self->{_pid}) failed");
    $self->{_pid} = undef;
    return;
 }

diff --git a/src/test/recovery/t/017_shm.pl b/src/test/recovery/t/017_shm.pl
index fd731c49a3e6cbe68a1d1a66592db1abc8120e6c..30d87daad99e0a234ede6b23a8aceec8bc2589db 100644 (file)
--- a/src/test/recovery/t/017_shm.pl
+++ b/src/test/recovery/t/017_shm.pl
@@ -9,7 +9,14 @@ use Test::More;
 use TestLib;
 use Time::HiRes qw(usleep);
 
-plan tests => 5;
+if ($^O eq 'msys')
+{
+   plan skip_all => 'missing SIGKILL implementation';
+}
+else
+{
+   plan tests => 5;
+}
 
 my $tempdir = TestLib::tempdir;
 my $port;