Commit d55227f0 authored by Magnus Hagander's avatar Magnus Hagander

Forgot to add file needed for PL regression tests

parent 54d20024
#
# Script that collects a list of regression tests from a Makefile
#
# $PostgreSQL: pgsql/src/tools/msvc/getregress.pl,v 1.1 2007/03/22 13:43:02 mha Exp $
#
use strict;
use warnings;
my $M;
open($M,"<Makefile") || open($M,"<GNUMakefile") || die "Could not open Makefile";
undef $/;
my $m = <$M>;
close($M);
$m =~ s/\\[\r\n]*//gs;
if ($m =~ /^REGRESS\s*=\s*(.*)$/gm)
{
my $t = $1;
$t =~ s/\s+/ /g;
print "SET TESTS=$t";
}
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment