database/postgres
1
0
Fork 0
mirror of https://github.com/postgres/postgres.git synced 2025-10-16 17:07:43 +03:00
Code Activity

Adjust new TAP test to work on macOS.

Browse Source 
Seems Apple's version of "wc -l" puts spaces before the number.
(I wonder why the cfbot didn't find this.)  While here, make
the failure case log what it got, to aid debugging future issues.

Per buildfarm.
This commit is contained in:
Tom Lane
2025-10-07 11:47:27 -04:00
parent 27da1a796f
commit afd532c3a8
1 changed files with 6 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
src/bin/psql/t/030_pager.pl
View File

@@ -25,8 +25,10 @@ my $result = IPC::Run::run [ 'wc', '-l' ],
'>' => \$wcstdout,
'2>' => \$wcstderr;
chomp $wcstdout;
if ($wcstdout ne '2' || $wcstderr ne '')
if ($wcstdout !~ /^ *2$/ || $wcstderr ne '')
{
note "wc stdout = '$wcstdout'\n";
note "wc stderr = '$wcstderr'\n";
plan skip_all => '"wc -l" is needed to run this test';
}
@@ -83,17 +85,17 @@ do_command(
do_command(
"SELECT 'test' AS t FROM generate_series(1,24);\n",
qr/^24\r?$/m,
qr/^ *24\r?$/m,
"execute SELECT query that needs pagination");
do_command(
"\\pset expanded\nSELECT generate_series(1,20) as g;\n",
qr/^39\r?$/m,
qr/^ *39\r?$/m,
"execute SELECT query that needs pagination in expanded mode");
do_command(
"\\pset tuples_only off\n\\d+ information_schema.referential_constraints\n",
qr/^\d+\r?$/m,
qr/^ *\d+\r?$/m,
"execute command with footer that needs pagination");
# send psql an explicit \q to shut it down, else pty won't close properly