version 1.69, 2011/07/08 18:57:41 |
version 1.70, 2011/11/17 11:37:16 |
|
|
|
|
use strict; |
use strict; |
use warnings; |
use warnings; |
|
use Config; |
use Getopt::Long; |
use Getopt::Long; |
use File::Basename; |
use File::Basename; |
use File::stat; |
use File::stat; |
|
|
'define-variable=s' => $variables, |
'define-variable=s' => $variables, |
); |
); |
|
|
|
# Unconditionally switch to static mode on static arches as --static |
|
# may not have been passed explicitly, but we don't want to re-order |
|
# and simplify the libs like we do for shared architectures. |
|
{ |
|
my @static_archs = qw(m88k vax); |
|
my $machine_arch = $Config{'ARCH'}; |
|
if (grep { $_ eq $machine_arch } @static_archs){ |
|
$mode{static} = 1; |
|
} |
|
} |
|
|
# Initial value of printerr depends on the options... |
# Initial value of printerr depends on the options... |
if (!defined $mode{printerr}) { |
if (!defined $mode{printerr}) { |
if (defined $mode{libs} |
if (defined $mode{libs} |
|
|
} |
} |
} |
} |
|
|
my $dep_cfg_list = simplify_and_reverse($cfg_full_list); |
my $dep_cfg_list = $cfg_full_list; |
|
|
|
if (!$mode{static}){ |
|
$dep_cfg_list = simplify_and_reverse($cfg_full_list); |
|
} |
|
|
if ($mode{cflags} || $mode{libs} || $mode{variable}) { |
if ($mode{cflags} || $mode{libs} || $mode{variable}) { |
push @vlist, do_cflags($dep_cfg_list) if $mode{cflags}; |
push @vlist, do_cflags($dep_cfg_list) if $mode{cflags}; |