18 lines
335 B
Perl
18 lines
335 B
Perl
#!/usr/bin/perl
|
|
|
|
sub SYS { system($_[0]); }
|
|
|
|
SYS("rm -rf build");
|
|
SYS("mkdir build");
|
|
|
|
for $f qw(DE ES FR IT PT TR) {
|
|
SYS("nmake clean");
|
|
SYS("nmake D=LDLANG_$f");
|
|
$fl = lc($f);
|
|
SYS("copy ldmicro.exe build\\ldmicro-$fl.exe");
|
|
}
|
|
|
|
SYS("nmake clean");
|
|
SYS("nmake D=LDLANG_EN");
|
|
SYS("copy ldmicro.exe build\\ldmicro.exe");
|