Fix instability in contrib/bloom TAP tests.
authorTom Lane <tgl@sss.pgh.pa.us>
Tue, 28 Sep 2021 21:34:31 +0000 (17:34 -0400)
committerTom Lane <tgl@sss.pgh.pa.us>
Tue, 28 Sep 2021 21:34:31 +0000 (17:34 -0400)
It turns out that the instability complained of in commit d3c09b9b1
has an embarrassingly simple explanation.  The test script waits for
the standby to flush incoming WAL to disk, but it should wait for
the WAL to be replayed, since we are testing for the effects of that
to be visible.

While at it, use wait_for_catchup instead of reinventing that logic,
and adjust $Test::Builder::Level to improve future error reports.

Back-patch to v12 where the necessary infrastructure came in
(cf. aforesaid commit).  Also back-patch 7d1aa6bf1 so that the
test will actually get run.

Discussion: https://postgr.es/m/2854602.1632852664@sss.pgh.pa.us

contrib/bloom/t/001_wal.pl

index 55ad35926f06fdf141a48993d41f354901200321..be8916a8ebf9d9347ad28f732fd30a8242479bce 100644 (file)
@@ -16,12 +16,10 @@ sub test_index_replay
 {
        my ($test_name) = @_;
 
+       local $Test::Builder::Level = $Test::Builder::Level + 1;
+
        # Wait for standby to catch up
-       my $applname = $node_standby->name;
-       my $caughtup_query =
-         "SELECT pg_current_wal_lsn() <= write_lsn FROM pg_stat_replication WHERE application_name = '$applname';";
-       $node_primary->poll_query_until('postgres', $caughtup_query)
-         or die "Timed out while waiting for standby 1 to catch up";
+       $node_primary->wait_for_catchup($node_standby);
 
        my $queries = qq(SET enable_seqscan=off;
 SET enable_bitmapscan=on;