postgresql/src/tools/msvc/mkvcbuild.pl

30 lines
771 B
Perl
Raw Normal View History

#
# Script that parses Unix style build environment and generates build files
# for building with Visual Studio.
#
2010-09-20 22:08:53 +02:00
# src/tools/msvc/mkvcbuild.pl
#
2006-09-04 23:30:40 +02:00
use strict;
use warnings;
use File::Basename;
use File::Spec;
BEGIN { use lib File::Spec->rel2abs(dirname(__FILE__)); }
use Mkvcbuild;
2006-09-04 23:30:40 +02:00
chdir('..\..\..') if (-d '..\msvc' && -d '..\..\..\src');
die 'Must run from root or msvc directory'
unless (-d 'src\tools\msvc' && -d 'src');
die 'Could not find config_default.pl'
unless (-f 'src/tools/msvc/config_default.pl');
print "Warning: no config.pl found, using default.\n"
unless (-f 'src/tools/msvc/config.pl');
2006-09-04 23:30:40 +02:00
our $config;
do './src/tools/msvc/config_default.pl';
do './src/tools/msvc/config.pl' if (-f 'src/tools/msvc/config.pl');
2006-09-04 23:30:40 +02:00
Mkvcbuild::mkvcbuild($config);