|
Last change
on this file was 969, checked in by bird, 19 years ago |
|
Fixing some svn props.
|
-
Property svn:eol-style
set to
LF
|
|
File size:
883 bytes
|
| Line | |
|---|
| 1 | # -*-perl-*-
|
|---|
| 2 |
|
|---|
| 3 | $description = "The following tests the special target .SILENT. By simply\n"
|
|---|
| 4 | ."mentioning this as a target, it tells make not to print\n"
|
|---|
| 5 | ."commands before executing them.";
|
|---|
| 6 |
|
|---|
| 7 | $details = "This test is the same as the clean test except that it should\n"
|
|---|
| 8 | ."not echo its command before deleting the specified file.\n";
|
|---|
| 9 |
|
|---|
| 10 | $example = "EXAMPLE_FILE";
|
|---|
| 11 |
|
|---|
| 12 | open(MAKEFILE,"> $makefile");
|
|---|
| 13 |
|
|---|
| 14 | # The Contents of the MAKEFILE ...
|
|---|
| 15 |
|
|---|
| 16 | print MAKEFILE ".SILENT : clean\n";
|
|---|
| 17 | print MAKEFILE "clean: \n";
|
|---|
| 18 | print MAKEFILE "\t$delete_command EXAMPLE_FILE\n";
|
|---|
| 19 |
|
|---|
| 20 | # END of Contents of MAKEFILE
|
|---|
| 21 |
|
|---|
| 22 | close(MAKEFILE);
|
|---|
| 23 |
|
|---|
| 24 | &touch($example);
|
|---|
| 25 |
|
|---|
| 26 | $answer = "";
|
|---|
| 27 | &run_make_with_options($makefile,"clean",&get_logfile,0);
|
|---|
| 28 | if (-f $example) {
|
|---|
| 29 | $test_passed = 0;
|
|---|
| 30 | }
|
|---|
| 31 | &compare_output($answer,&get_logfile(1));
|
|---|
| 32 |
|
|---|
| 33 | 1;
|
|---|
| 34 |
|
|---|
| 35 |
|
|---|
| 36 |
|
|---|
| 37 |
|
|---|
| 38 |
|
|---|
| 39 |
|
|---|
| 40 |
|
|---|
| 41 |
|
|---|
| 42 |
|
|---|
Note:
See
TracBrowser
for help on using the repository browser.