|
Last change
on this file was 969, checked in by bird, 18 years ago |
|
Fixing some svn props.
|
-
Property svn:eol-style
set to
LF
|
|
File size:
989 bytes
|
| Line | |
|---|
| 1 | # -*-perl-*-
|
|---|
| 2 | $description = "Test generic option processing.\n";
|
|---|
| 3 |
|
|---|
| 4 | open(MAKEFILE, "> $makefile");
|
|---|
| 5 |
|
|---|
| 6 | # The Contents of the MAKEFILE ...
|
|---|
| 7 |
|
|---|
| 8 | print MAKEFILE "foo 1foo: ; \@echo \$\@\n";
|
|---|
| 9 |
|
|---|
| 10 | close(MAKEFILE);
|
|---|
| 11 |
|
|---|
| 12 | # TEST 0
|
|---|
| 13 |
|
|---|
| 14 | &run_make_with_options($makefile, "-j 1foo", &get_logfile);
|
|---|
| 15 | if (!$parallel_jobs) {
|
|---|
| 16 | $answer = "$make_name: Parallel jobs (-j) are not supported on this platform.\n$make_name: Resetting to single job (-j1) mode.\n1foo\n";
|
|---|
| 17 | }
|
|---|
| 18 | else {
|
|---|
| 19 | $answer = "1foo\n";
|
|---|
| 20 | }
|
|---|
| 21 |
|
|---|
| 22 | # TEST 1
|
|---|
| 23 |
|
|---|
| 24 | # This test prints the usage string; I don't really know a good way to
|
|---|
| 25 | # test it. I guess I could invoke make with a known-bad option to see
|
|---|
| 26 | # what the usage looks like, then compare it to what I get here... :(
|
|---|
| 27 |
|
|---|
| 28 | # If I were always on UNIX, I could invoke it with 2>/dev/null, then
|
|---|
| 29 | # just check the error code.
|
|---|
| 30 |
|
|---|
| 31 | &run_make_with_options($makefile, "-j1foo 2>/dev/null", &get_logfile, 512);
|
|---|
| 32 | $answer = "";
|
|---|
| 33 | &compare_output($answer, &get_logfile(1));
|
|---|
| 34 |
|
|---|
| 35 | 1;
|
|---|
Note:
See
TracBrowser
for help on using the repository browser.