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

Remove 3 hex digit limit on symbol number in recent fix.

Browse Source
This commit is contained in:
Andrew Dunstan 2008-01-31 16:30:24 +00:00
parent 55986a5eb8
commit 7ae43187ee
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/tools/msvc/gendef.pl
View File

@ -2,7 +2,7 @@ my @def;
# #
# Script that generates a .DEF file for all objects in a directory # Script that generates a .DEF file for all objects in a directory
# #
# $PostgreSQL: pgsql/src/tools/msvc/gendef.pl,v 1.7 2008/01/31 03:26:14 adunstan Exp $ # $PostgreSQL: pgsql/src/tools/msvc/gendef.pl,v 1.8 2008/01/31 16:30:24 adunstan Exp $
# #
die "Usage: gendef.pl <modulepath>\n" unless ($ARGV[0] =~ /\\([^\\]+$)/); die "Usage: gendef.pl <modulepath>\n" unless ($ARGV[0] =~ /\\([^\\]+$)/);
@ -27,7 +27,7 @@ while (<$ARGV[0]/*.obj>)
{ {
s/\(\)//g; s/\(\)//g;
my @pieces = split; my @pieces = split;
next unless $pieces[0] =~ /^[A-F0-9]{3}$/; next unless $pieces[0] =~ /^[A-F0-9]{3,}$/;
next unless $pieces[6]; next unless $pieces[6];
next if ($pieces[2] eq "UNDEF"); next if ($pieces[2] eq "UNDEF");
next unless ($pieces[4] eq "External"); next unless ($pieces[4] eq "External");