1# -*-perl-*- 2$description = "The following test creates a makefile to verify 3the ability of make to strip white space from lists of object.\n"; 4 5 6$details = "The make file is built with a list of objects that contain white space 7These are then run through the strip command to remove it. This is then 8verified by echoing the result.\n"; 9 10open(MAKEFILE,"> $makefile"); 11 12# The Contents of the MAKEFILE ... 13 14print MAKEFILE <<'EOMAKE'; 15TEST1 := "Is this TERMINAL fun? What makes you believe is this terminal fun? JAPAN is a WONDERFUL planet -- I wonder if we will ever reach their level of COMPARATIVE SHOPPING..." 16E := 17TEST2 := $E try this and this $E 18 19define TEST3 20 21and these test out 22 23 24some 25blank lines 26 27 28 29endef 30 31.PHONY: all 32all: 33 @echo '$(strip $(TEST1) )' 34 @echo '$(strip $(TEST2) )' 35 @echo '$(strip $(TEST3) )' 36 37space: ; @echo '$(strip ) $(strip )' 38 39EOMAKE 40 41# END of Contents of MAKEFILE 42 43close(MAKEFILE); 44 45&run_make_with_options($makefile,"",&get_logfile); 46$answer = "\"Is this TERMINAL fun? What makes you believe is this terminal fun? JAPAN is a WONDERFUL planet -- I wonder if we will ever reach their level of COMPARATIVE SHOPPING...\" 47try this and this 48and these test out some blank lines 49"; 50&compare_output($answer,&get_logfile(1)); 51 52 53&run_make_with_options($makefile,"space",&get_logfile); 54$answer = " \n"; 55&compare_output($answer,&get_logfile(1)); 56 571; 58