git

1
#!/usr/bin/perl -w
2
######################################################################
3
# Libifies files on Windows
4
#
5
# This is a wrapper to facilitate the compilation of Git with MSVC
6
# using GNU Make as the build system. So, instead of manipulating the
7
# Makefile into something nasty, just to support non-space arguments
8
# etc, we use this wrapper to fix the command line options
9
#
10
# Copyright (C) 2009 Marius Storm-Olsen <mstormo@gmail.com>
11
######################################################################
12
use strict;
13
my @args = ();
14
while (@ARGV) {
15
	my $arg = shift @ARGV;
16
	if ("$arg" eq "rcs") {
17
		# Consume the rcs option
18
	} elsif ("$arg" =~ /\.a$/) {
19
		push(@args, "-OUT:$arg");
20
	} else {
21
		push(@args, $arg);
22
	}
23
}
24
unshift(@args, "lib.exe");
25
# printf("**** @args\n");
26
exit (system(@args) != 0);
27