diff options
-rw-r--r-- | src/test/recovery/t/017_shm.pl | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/src/test/recovery/t/017_shm.pl b/src/test/recovery/t/017_shm.pl index 3cbe938ddd1..f89d53a8793 100644 --- a/src/test/recovery/t/017_shm.pl +++ b/src/test/recovery/t/017_shm.pl @@ -3,6 +3,7 @@ # use strict; use warnings; +use Config; use IPC::Run 'run'; use PostgresNode; use Test::More; @@ -11,6 +12,14 @@ use Time::HiRes qw(usleep); plan tests => 5; +# See PostgresNode +my $vfs_path = ''; +if ($Config{osname} eq 'msys') +{ + $vfs_path = `cd / && pwd -W`; + chomp $vfs_path; +} + my $tempdir = TestLib::tempdir; my $port; @@ -97,7 +106,7 @@ log_ipcs(); $gnat->safe_psql('postgres', <<EOSQL); CREATE FUNCTION wait_pid(int) RETURNS void - AS '$ENV{REGRESS_SHLIB}' + AS '$vfs_path$ENV{REGRESS_SHLIB}' LANGUAGE C STRICT; EOSQL my $slow_query = 'SELECT wait_pid(pg_backend_pid())'; |