1*7f56925bSchristos$description = "The following test creates a makefile to test the join "
2*7f56925bSchristos              ."function.";
3*7f56925bSchristos
4*7f56925bSchristos$details = "";
5*7f56925bSchristos
6*7f56925bSchristos# IF YOU NEED >1 MAKEFILE FOR THIS TEST, USE &get_tmpfile; TO GET
7*7f56925bSchristos# THE NAME OF THE MAKEFILE.  THIS INSURES CONSISTENCY AND KEEPS TRACK OF
8*7f56925bSchristos# HOW MANY MAKEFILES EXIST FOR EASY DELETION AT THE END.
9*7f56925bSchristos# EXAMPLE: $makefile2 = &get_tmpfile;
10*7f56925bSchristos
11*7f56925bSchristos
12*7f56925bSchristosopen(MAKEFILE,"> $makefile");
13*7f56925bSchristos
14*7f56925bSchristos# The Contents of the MAKEFILE ...
15*7f56925bSchristos
16*7f56925bSchristosprint MAKEFILE "string := \$(join a b c,foo      hacks .pl1) \n"
17*7f56925bSchristos              ."all: \n"
18*7f56925bSchristos              ."\t\@echo \$(string) \n";
19*7f56925bSchristos
20*7f56925bSchristos# END of Contents of MAKEFILE
21*7f56925bSchristos
22*7f56925bSchristosclose(MAKEFILE);
23*7f56925bSchristos
24*7f56925bSchristos&run_make_with_options($makefile,"",&get_logfile,0);
25*7f56925bSchristos
26*7f56925bSchristos# Create the answer to what should be produced by this Makefile
27*7f56925bSchristos$answer = "afoo bhacks c.pl1\n";
28*7f56925bSchristos
29*7f56925bSchristos# COMPARE RESULTS
30*7f56925bSchristos
31*7f56925bSchristos# In this call to compare output, you should use the call &get_logfile(1)
32*7f56925bSchristos# to send the name of the last logfile created.  You may also use
33*7f56925bSchristos# the special call &get_logfile(1) which returns the same as &get_logfile(1).
34*7f56925bSchristos
35*7f56925bSchristos&compare_output($answer,&get_logfile(1));
36*7f56925bSchristos
37*7f56925bSchristos# This tells the test driver that the perl test script executed properly.
38*7f56925bSchristos1;
39*7f56925bSchristos
40*7f56925bSchristos
41*7f56925bSchristos
42*7f56925bSchristos
43*7f56925bSchristos
44*7f56925bSchristos
45