25 lines
456 B
Plaintext
25 lines
456 B
Plaintext
|
#!/usr/bin/perl -w
|
||
|
|
|
||
|
|
system('prj2make libsecondlife.sln')
|
||
|
|
and die "*** prj2make failed\n";
|
||
|
|
|
||
|
|
open(MAKEFILE, 'Makefile')
|
||
|
|
or die "*** failed to open Makefile for reading: $!\n";
|
||
|
|
|
||
|
|
while (<MAKEFILE>) {
|
||
|
|
s/^MCS=mcs$/MCS=gmcs/;
|
||
|
|
push @patched, $_;
|
||
|
|
}
|
||
|
|
|
||
|
|
close(MAKEFILE);
|
||
|
|
|
||
|
|
open(MAKEFILE, '>Makefile')
|
||
|
|
or die "*** failed to open Makefile for writing: $!\n";
|
||
|
|
|
||
|
|
print MAKEFILE $_ foreach @patched;
|
||
|
|
|
||
|
|
close(MAKEFILE);
|
||
|
|
|
||
|
|
system('make', @ARGV)
|
||
|
|
and die "*** make failed\n";
|