mirror of
https://github.com/jart/cosmopolitan.git
synced 2025-03-03 07:29:23 +00:00
30 lines
798 B
Perl
30 lines
798 B
Perl
# -*-perl-*-
|
|
$description = "Test generic option processing.\n";
|
|
|
|
# TEST 0
|
|
|
|
if (!$parallel_jobs) {
|
|
$answer = "#MAKE#: Parallel jobs (-j) are not supported on this platform.\n#MAKE#: Resetting to single job (-j1) mode.\n1foo\n";
|
|
}
|
|
else {
|
|
$answer = "1foo\n";
|
|
}
|
|
|
|
run_make_test(q!
|
|
foo 1foo: ; @echo $@
|
|
!,
|
|
"-j 1foo", $answer);
|
|
|
|
# TEST 1
|
|
|
|
# This test prints the usage string; I don't really know a good way to
|
|
# test it. I guess I could invoke make with a known-bad option to see
|
|
# what the usage looks like, then compare it to what I get here... :(
|
|
|
|
# On UNIX I can invoke it with 2>/dev/null, then just check the error code.
|
|
|
|
if ($port_type ne 'W32') {
|
|
run_make_test(undef, "-j1foo 2>/dev/null", '', 512);
|
|
}
|
|
|
|
1;
|