1 1.1 christos # -*-perl-*- 2 1.1 christos 3 1.1 christos $description = "The following tests the special target .SILENT. By simply\n" 4 1.1 christos ."mentioning this as a target, it tells make not to print\n" 5 1.1 christos ."commands before executing them."; 6 1.1 christos 7 1.1 christos $details = "This test is the same as the clean test except that it should\n" 8 1.1 christos ."not echo its command before deleting the specified file.\n"; 9 1.1 christos 10 1.1 christos $example = "EXAMPLE_FILE"; 11 1.1 christos 12 1.1 christos open(MAKEFILE,"> $makefile"); 13 1.1 christos 14 1.1 christos # The Contents of the MAKEFILE ... 15 1.1 christos 16 1.1 christos print MAKEFILE ".SILENT : clean\n"; 17 1.1 christos print MAKEFILE "clean: \n"; 18 1.1 christos print MAKEFILE "\t$delete_command EXAMPLE_FILE\n"; 19 1.1 christos 20 1.1 christos # END of Contents of MAKEFILE 21 1.1 christos 22 1.1 christos close(MAKEFILE); 23 1.1 christos 24 1.1 christos &touch($example); 25 1.1 christos 26 1.1 christos $answer = ""; 27 1.1 christos &run_make_with_options($makefile,"clean",&get_logfile,0); 28 1.1 christos if (-f $example) { 29 1.1 christos $test_passed = 0; 30 1.1 christos } 31 1.1 christos &compare_output($answer,&get_logfile(1)); 32 1.1 christos 33 1.1 christos 1; 34 1.1 christos 35 1.1 christos 36 1.1 christos 37 1.1 christos 38 1.1 christos 39 1.1 christos 40 1.1 christos 41 1.1 christos 42 1.1 christos 43