You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
27 lines
803 B
27 lines
803 B
16 years ago
|
#!/usr/bin/perl -w
|
||
|
|
######################################################################
|
||
|
|
# Libifies files on Windows
|
||
|
|
#
|
||
|
|
# This is a wrapper to facilitate the compilation of Git with MSVC
|
||
|
|
# using GNU Make as the build system. So, instead of manipulating the
|
||
|
|
# Makefile into something nasty, just to support non-space arguments
|
||
|
|
# etc, we use this wrapper to fix the command line options
|
||
|
|
#
|
||
|
|
# Copyright (C) 2009 Marius Storm-Olsen <mstormo@gmail.com>
|
||
|
|
######################################################################
|
||
|
|
use strict;
|
||
|
|
my @args = ();
|
||
|
|
while (@ARGV) {
|
||
|
|
my $arg = shift @ARGV;
|
||
|
|
if ("$arg" eq "rcs") {
|
||
|
|
# Consume the rcs option
|
||
|
|
} elsif ("$arg" =~ /\.a$/) {
|
||
|
|
push(@args, "-OUT:$arg");
|
||
|
|
} else {
|
||
|
|
push(@args, $arg);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
unshift(@args, "lib.exe");
|
||
|
|
# printf("**** @args\n");
|
||
|
|
exit system(@args);
|