1# -*-perl-*- 2$description = "Test the addsuffix function."; 3 4$details = ""; 5 6 7open(MAKEFILE,"> $makefile"); 8 9# The Contents of the MAKEFILE ... 10 11print MAKEFILE <<EOMAKE; 12string := \$(addsuffix .c,src${pathsep}a.b.z.foo hacks) 13one: ; \@echo \$(string) 14 15two: ; \@echo \$(addsuffix foo,) 16EOMAKE 17 18close(MAKEFILE); 19 20 21# TEST 0 22 23&run_make_with_options($makefile, "", &get_logfile); 24$answer = "src${pathsep}a.b.z.foo.c hacks.c\n"; 25&compare_output($answer,&get_logfile(1)); 26 27 28# TEST 1 29 30&run_make_with_options($makefile, "two", &get_logfile); 31$answer = "\n"; 32&compare_output($answer,&get_logfile(1)); 33 34 35# This tells the test driver that the perl test script executed properly. 361; 37