File tree Expand file tree Collapse file tree 2 files changed +22
-2
lines changed
Filter options
Expand file tree Collapse file tree 2 files changed +22
-2
lines changed
Original file line number Diff line number Diff line change @@ -3,7 +3,7 @@ package Mkvcbuild;
3
3
#
4
4
# Package that generates build files for msvc build
5
5
#
6
- # $PostgreSQL: pgsql/src/tools/msvc/Mkvcbuild.pm,v 1.15 2007/07/23 10:16:54 mha Exp $
6
+ # $PostgreSQL: pgsql/src/tools/msvc/Mkvcbuild.pm,v 1.16 2007/08/21 15: 10:41 mha Exp $
7
7
#
8
8
use Carp;
9
9
use Win32;
@@ -70,6 +70,13 @@ sub mkvcbuild
70
70
$postgres -> AddLibrary(' wldap32.lib' ) if ($solution -> {options }-> {ldap });
71
71
$postgres -> FullExportDLL(' postgres.lib' );
72
72
73
+ my $snowball = $solution -> AddProject(' dict_snowball' ,' dll' ,' ' ,' src\backend\snowball' );
74
+ $snowball -> RelocateFiles(' src\backend\snowball\libstemmer' , sub {
75
+ return shift !~ / dict_snowball.c$ / ;
76
+ });
77
+ $snowball -> AddIncludeDir(' src\include\snowball' );
78
+ $snowball -> AddReference($postgres );
79
+
73
80
my $plpgsql = $solution -> AddProject(' plpgsql' ,' dll' ,' PLs' ,' src\pl\plpgsql\src' );
74
81
$plpgsql -> AddFiles(' src\pl\plpgsql\src' ,' scan.l' ,' gram.y' );
75
82
$plpgsql -> AddReference($postgres );
Original file line number Diff line number Diff line change @@ -3,11 +3,12 @@ package Project;
3
3
#
4
4
# Package that encapsulates a Visual C++ project file generation
5
5
#
6
- # $PostgreSQL: pgsql/src/tools/msvc/Project.pm,v 1.13 2007/07/25 10:51:03 mha Exp $
6
+ # $PostgreSQL: pgsql/src/tools/msvc/Project.pm,v 1.14 2007/08/21 15: 10:41 mha Exp $
7
7
#
8
8
use Carp;
9
9
use strict;
10
10
use warnings;
11
+ use File::Basename;
11
12
12
13
sub new
13
14
{
@@ -96,6 +97,18 @@ sub RemoveFile
96
97
confess(" Could not find file $filename to remove\n " );
97
98
}
98
99
100
+ sub RelocateFiles
101
+ {
102
+ my ($self , $targetdir , $proc ) = @_ ;
103
+ foreach my $f (keys %{$self -> {files }}) {
104
+ my $r = &$proc ($f );
105
+ if ($r ) {
106
+ $self -> RemoveFile($f );
107
+ $self -> AddFile($targetdir . ' \\ ' . basename($f ));
108
+ }
109
+ }
110
+ }
111
+
99
112
sub AddReference
100
113
{
101
114
my $self = shift ;
You can’t perform that action at this time.
0 commit comments