# -*-perl-*- $description = "The following test creates a makefile to delete a \n" ."file in the directory. It tests to see if make will \n" ."NOT execute the command unless the rule is given in \n" ."the make command line."; $example = "EXAMPLE_FILE"; open(MAKEFILE,"> $makefile"); print MAKEFILE qq! all: ; \@echo This makefile did not clean the dir... good clean: ; $CMD_rmfile $example !; close(MAKEFILE); touch($example); run_make_with_options($makefile,"",&get_logfile,0); $answer = "This makefile did not clean the dir... good\n"; compare_output($answer,&get_logfile(1)) || error("abort"); $answer = "$CMD_rmfile $example\n"; run_make_with_options($makefile,"clean",&get_logfile,0); if (-f $example) { $test_passed = 0; } compare_output($answer,&get_logfile(1)) || error("abort"); 1;