sin/samba-mirror
1
0
Fork 0
mirror of https://github.com/samba-team/samba.git synced 2025-08-05 12:22:11 +03:00
Code Activity

s4-script: added a --waf option to minimal_includes.pl

Browse Source 
This takes advantage of the new waf target syntax
This commit is contained in:
Andrew Tridgell
2010-05-04 10:30:39 +02:00
parent 7281b02181
commit 6eb839cd16
1 changed files with 7 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
source4/script/minimal_includes.pl
View File

@ -11,6 +11,7 @@ use Getopt::Long;
my $opt_help = 0; my $opt_help = 0;
my $opt_remove = 0; my $opt_remove = 0;
my $opt_skip_system = 0; my $opt_skip_system = 0;
my $opt_waf = 0;
##################################################################### #####################################################################
# write a string into a file # write a string into a file
@ -43,6 +44,10 @@ sub test_compile($)
{ {
my $fname = shift; my $fname = shift;
my $obj; my $obj;
if ($opt_waf) {
my $ret = `../buildtools/bin/waf $fname 2>&1`;
return $ret
}
if ($fname =~ s/(.*)\..*$/$1.o/) { if ($fname =~ s/(.*)\..*$/$1.o/) {
$obj = "$1.o"; $obj = "$1.o";
} else { } else {
@ -142,6 +147,7 @@ sub ShowHelp()
--help show help --help show help
--remove remove includes, don't just list them --remove remove includes, don't just list them
--skip-system don't remove system/ includes --skip-system don't remove system/ includes
--waf use waf target conventions
"; ";
} }
@ -151,6 +157,7 @@ GetOptions (
'h|help|?' => \$opt_help, 'h|help|?' => \$opt_help,
'remove' => \$opt_remove, 'remove' => \$opt_remove,
'skip-system' => \$opt_skip_system, 'skip-system' => \$opt_skip_system,
'waf' => \$opt_waf,
); );
if ($opt_help) { if ($opt_help) {