mirror of
https://git.savannah.gnu.org/git/make.git
synced 2024-12-28 15:57:48 +00:00
42 lines
883 B
Perl
42 lines
883 B
Perl
# -*-perl-*-
|
|
|
|
$description = "The following tests the special target .SILENT. By simply\n"
|
|
."mentioning this as a target, it tells make not to print\n"
|
|
."commands before executing them.";
|
|
|
|
$details = "This test is the same as the clean test except that it should\n"
|
|
."not echo its command before deleting the specified file.\n";
|
|
|
|
$example = "EXAMPLE_FILE";
|
|
|
|
open(MAKEFILE,"> $makefile");
|
|
|
|
# The Contents of the MAKEFILE ...
|
|
|
|
print MAKEFILE ".SILENT : clean\n";
|
|
print MAKEFILE "clean: \n";
|
|
print MAKEFILE "\t$delete_command EXAMPLE_FILE\n";
|
|
|
|
# END of Contents of MAKEFILE
|
|
|
|
close(MAKEFILE);
|
|
|
|
&touch($example);
|
|
|
|
$answer = "";
|
|
&run_make_with_options($makefile,"clean",&get_logfile,0);
|
|
if (-f $example) {
|
|
$test_passed = 0;
|
|
}
|
|
&compare_output($answer,&get_logfile(1));
|
|
|
|
1;
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|