From de6502ab6e79434f9920773f6a0d3f26ae25eb83 Mon Sep 17 00:00:00 2001
From: "Jonathan S. Katz" <jkatz@users.noreply.github.com>
Date: Thu, 29 Jun 2023 11:36:08 -0400
Subject: [PATCH] Simplify TAP test structure to align with upstream (#169)

postgres/postgres@549ec20 moved to using "done_testing()" from
the Perl testing framework, which removed the need to include test
counts.
---
 test/t/001_wal.pl          | 4 +++-
 test/t/002_vacuum.pl       | 4 +++-
 test/t/003_recall.pl       | 4 +++-
 test/t/004_centers.pl      | 4 +++-
 test/t/005_query_recall.pl | 4 +++-
 test/t/006_lists.pl        | 4 +++-
 test/t/007_inserts.pl      | 4 +++-
 test/t/008_avg.pl          | 4 +++-
 test/t/009_storage.pl      | 4 +++-
 9 files changed, 27 insertions(+), 9 deletions(-)

diff --git a/test/t/001_wal.pl b/test/t/001_wal.pl
index 46060ed..d56f131 100644
--- a/test/t/001_wal.pl
+++ b/test/t/001_wal.pl
@@ -5,7 +5,7 @@
 use warnings;
 use PostgresNode;
 use TestLib;
-use Test::More tests => 31;
+use Test::More;
 
 my $dim = 32;
 
@@ -95,3 +95,5 @@ sub test_index_replay
 	);
 	test_index_replay("insert $i");
 }
+
+done_testing();
diff --git a/test/t/002_vacuum.pl b/test/t/002_vacuum.pl
index 1c3d718..16ac0d6 100644
--- a/test/t/002_vacuum.pl
+++ b/test/t/002_vacuum.pl
@@ -2,7 +2,7 @@
 use warnings;
 use PostgresNode;
 use TestLib;
-use Test::More tests => 1;
+use Test::More;
 
 my $dim = 3;
 
@@ -39,3 +39,5 @@
 # Check size
 my $new_size = $node->safe_psql("postgres", "SELECT pg_total_relation_size('tst_v_idx');");
 is($size, $new_size, "size does not change");
+
+done_testing();
diff --git a/test/t/003_recall.pl b/test/t/003_recall.pl
index 6e896a8..8e7042a 100644
--- a/test/t/003_recall.pl
+++ b/test/t/003_recall.pl
@@ -2,7 +2,7 @@
 use warnings;
 use PostgresNode;
 use TestLib;
-use Test::More tests => 14;
+use Test::More;
 
 my $node;
 my @queries = ();
@@ -97,3 +97,5 @@ sub test_recall
 	# Account for equal distances
 	test_recall(100, 0.9975, $operator);
 }
+
+done_testing();
diff --git a/test/t/004_centers.pl b/test/t/004_centers.pl
index 9c2b53a..47939ff 100644
--- a/test/t/004_centers.pl
+++ b/test/t/004_centers.pl
@@ -2,7 +2,7 @@
 use warnings;
 use PostgresNode;
 use TestLib;
-use Test::More tests => 3;
+use Test::More;
 
 # Initialize node
 my $node = get_new_node('node');
@@ -34,3 +34,5 @@ sub test_centers
 
 # Test no error for duplicate centers
 test_centers(10);
+
+done_testing();
diff --git a/test/t/005_query_recall.pl b/test/t/005_query_recall.pl
index 90da2a3..50bbb56 100644
--- a/test/t/005_query_recall.pl
+++ b/test/t/005_query_recall.pl
@@ -2,7 +2,7 @@
 use warnings;
 use PostgresNode;
 use TestLib;
-use Test::More tests => 60;
+use Test::More;
 
 # Initialize node
 my $node = get_new_node('node');
@@ -43,3 +43,5 @@
 		is($res, $query);
 	}
 }
+
+done_testing();
diff --git a/test/t/006_lists.pl b/test/t/006_lists.pl
index eeb11aa..302c9b3 100644
--- a/test/t/006_lists.pl
+++ b/test/t/006_lists.pl
@@ -2,7 +2,7 @@
 use warnings;
 use PostgresNode;
 use TestLib;
-use Test::More tests => 3;
+use Test::More;
 
 # Initialize node
 my $node = get_new_node('node');
@@ -29,3 +29,5 @@
 	"CREATE INDEX lists10000 ON tst USING ivfflat (v) WITH (lists = 10000);"
 );
 like($stderr, qr/memory required is/);
+
+done_testing();
diff --git a/test/t/007_inserts.pl b/test/t/007_inserts.pl
index 73d77b5..0cf087f 100644
--- a/test/t/007_inserts.pl
+++ b/test/t/007_inserts.pl
@@ -2,7 +2,7 @@
 use warnings;
 use PostgresNode;
 use TestLib;
-use Test::More tests => 7;
+use Test::More;
 
 my $dim = 768;
 
@@ -53,3 +53,5 @@ sub idx_scan
 ));
 is($count, $expected);
 is(idx_scan(), 1);
+
+done_testing();
diff --git a/test/t/008_avg.pl b/test/t/008_avg.pl
index f03df61..b036678 100644
--- a/test/t/008_avg.pl
+++ b/test/t/008_avg.pl
@@ -2,7 +2,7 @@
 use warnings;
 use PostgresNode;
 use TestLib;
-use Test::More tests => 5;
+use Test::More;
 
 # Initialize node
 my $node = get_new_node('node');
@@ -33,3 +33,5 @@
 # Test explain
 my $explain = $node->safe_psql("postgres", "EXPLAIN SELECT AVG(v) FROM tst;");
 like($explain, qr/Partial Aggregate/);
+
+done_testing();
diff --git a/test/t/009_storage.pl b/test/t/009_storage.pl
index de818c7..b5aa649 100644
--- a/test/t/009_storage.pl
+++ b/test/t/009_storage.pl
@@ -2,7 +2,7 @@
 use warnings;
 use PostgresNode;
 use TestLib;
-use Test::More tests => 1;
+use Test::More;
 
 my $dim = 1024;
 
@@ -30,3 +30,5 @@
 	"INSERT INTO tst SELECT array_agg(n), array_agg(n), array_agg(n) FROM generate_series(1, $dim) n"
 );
 like($stderr, qr/row is too big/);
+
+done_testing();