mirrors/postgres
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Detect out of date flex in MSVC builds.

Browse Source 
Per recent discussion, following a report from Quan Zongliang.
The same logic is used as in pgbison.pl.
This commit is contained in:
Andrew Dunstan 2011-08-30 12:06:32 -04:00
parent 8a3d33c8e6
commit 94478aa8b1
1 changed files with 7 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
src/tools/msvc/pgflex.pl
View File

@ -12,10 +12,14 @@ use File::Basename;
require 'src/tools/msvc/buildenv.pl' if -e 'src/tools/msvc/buildenv.pl';
system('flex -V > NUL');
if ($? != 0)
my ($flexver) = `flex -V`; # grab first line
$flexver=(split(/\s+/,$flexver))[1];
$flexver =~ s/[^0-9.]//g;
my @verparts = split(/\./,$flexver);
unless ($verparts[0] == 2 && $verparts[1] == 5 && $verparts[2] >= 31)
{
print "WARNING! flex install not found, attempting to build without\n";
print "WARNING! Flex install not found, or unsupported Flex version.\n";
print "echo Attempting to build without.\n";
exit 0;
}