mirror of
https://gitea.nishi.boats/pyrite-dev/milsko
synced 2026-01-01 23:20:50 +00:00
git-svn-id: http://svn2.nishi.boats/svn/milsko/trunk@252 b9cfdab3-6d41-4d17-bbe4-086880011989
42 lines
835 B
Perl
Executable File
42 lines
835 B
Perl
Executable File
#!/usr/bin/env perl
|
|
# $Id$
|
|
|
|
my $target = "nt";
|
|
my @cmd = ();
|
|
push(@cmd, "-I$ENV{WATCOM}/h");
|
|
push(@cmd, "-I$ENV{WATCOM}/h/nt");
|
|
push(@cmd, "-DSTBI_NO_SIMD");
|
|
foreach my $f (@ARGV) {
|
|
if ($f eq "-static-libgcc") {
|
|
next;
|
|
}
|
|
elsif ($f =~ /^-Wl,--out-implib,(.+)$/) {
|
|
push(@cmd, "-Wl,option implib=$1");
|
|
next;
|
|
}
|
|
elsif ($f =~ /^-W.+$/) {
|
|
next;
|
|
}
|
|
elsif ($f =~ /^-L(.+)$/) {
|
|
push(@cmd, "-Wl,libpath $1");
|
|
next;
|
|
}
|
|
elsif ($f eq "-lMw") {
|
|
push(@cmd, "-lMw");
|
|
next;
|
|
}
|
|
elsif ($f =~ /^-l(.+)$/) {
|
|
push(@cmd, "$1.lib");
|
|
next;
|
|
}
|
|
elsif ($f =~ /^(?:oo)?src\//) {
|
|
$target = "nt_dll";
|
|
}
|
|
push(@cmd, $f);
|
|
}
|
|
|
|
unshift(@cmd, "-b$target");
|
|
|
|
print("Running: owcc " . join(" ", @cmd) . "\n");
|
|
exec("owcc", @cmd);
|