drew
/
acadia-newlib
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

* speclib: Use a more robust method to derive full file path.

This commit is contained in:
Christopher Faylor 2009-04-10 04:29:25 +00:00
parent 59328e28c4
commit 1318037e44
2 changed files with 7 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
winsup/cygwin/ChangeLog
View File

@ -1,3 +1,7 @@
2009-04-10 Christopher Faylor <me+cygwin@cgf.cx>
* speclib: Use a more robust method to derive full file path.
2009-04-09 Christopher Faylor <me+cygwin@cgf.cx> 2009-04-09 Christopher Faylor <me+cygwin@cgf.cx>
* speclib: Semi-revert to previous version but don't try to generate * speclib: Semi-revert to previous version but don't try to generate

6
winsup/cygwin/speclib
View File

@ -2,7 +2,7 @@
use Getopt::Long; use Getopt::Long;
use File::Temp qw'tempdir'; use File::Temp qw'tempdir';
use File::Basename; use File::Basename;
use Cwd; use File::Spec;
use strict; use strict;
sub dllname($;$); sub dllname($;$);
@ -14,8 +14,8 @@ GetOptions('static!'=>\$static, 'v|exclude!'=>\$exclude);
my $nm = shift; my $nm = shift;
my $ar = shift; my $ar = shift;
my $libdll = Cwd::abs_path(shift @ARGV); my $libdll = File::Spec->rel2abs(shift @ARGV);
my $lib = Cwd::abs_path(pop @ARGV); my $lib = File::Spec->rel2abs(pop @ARGV);
open my $nm_fd, '-|', $nm, '-Ap', '--defined-only', @ARGV, $libdll or open my $nm_fd, '-|', $nm, '-Ap', '--defined-only', @ARGV, $libdll or
die "$0: execution of $nm for object files failed - $!\n"; die "$0: execution of $nm for object files failed - $!\n";