| 1 | $description = "This is part 2 in a series to test the vpath directive\n"
|
|---|
| 2 | ."It tests the three forms of the directive:\n"
|
|---|
| 3 | ." vpath pattern directive\n"
|
|---|
| 4 | ." vpath pattern (clears path associated with pattern)\n"
|
|---|
| 5 | ." vpath (clears all paths specified with vpath)\n";
|
|---|
| 6 |
|
|---|
| 7 | $details = "This test simply adds many search paths using various vpath\n"
|
|---|
| 8 | ."directive forms and clears them afterwards. It has a simple\n"
|
|---|
| 9 | ."rule to print a message at the end to confirm that the makefile\n"
|
|---|
| 10 | ."ran with no errors.\n";
|
|---|
| 11 |
|
|---|
| 12 | open(MAKEFILE,"> $makefile");
|
|---|
| 13 |
|
|---|
| 14 | # The Contents of the MAKEFILE ...
|
|---|
| 15 |
|
|---|
| 16 | print MAKEFILE "VPATH = $workdir:$sourcedir\n";
|
|---|
| 17 | print MAKEFILE "vpath %.c foo\n";
|
|---|
| 18 | print MAKEFILE "vpath %.c $workdir\n";
|
|---|
| 19 | print MAKEFILE "vpath %.c $sourcedir\n";
|
|---|
| 20 | print MAKEFILE "vpath %.h $workdir\n";
|
|---|
| 21 | print MAKEFILE "vpath %.c\n";
|
|---|
| 22 | print MAKEFILE "vpath\n";
|
|---|
| 23 | print MAKEFILE "all:\n";
|
|---|
| 24 | print MAKEFILE "\t\@echo ALL IS WELL\n";
|
|---|
| 25 | # END of Contents of MAKEFILE
|
|---|
| 26 |
|
|---|
| 27 | close(MAKEFILE);
|
|---|
| 28 |
|
|---|
| 29 | &run_make_with_options($makefile,"",&get_logfile);
|
|---|
| 30 |
|
|---|
| 31 | # Create the answer to what should be produced by this Makefile
|
|---|
| 32 | $answer = "ALL IS WELL\n";
|
|---|
| 33 |
|
|---|
| 34 | &compare_output($answer,&get_logfile(1));
|
|---|
| 35 |
|
|---|
| 36 | 1;
|
|---|
| 37 |
|
|---|
| 38 |
|
|---|
| 39 |
|
|---|
| 40 |
|
|---|
| 41 |
|
|---|
| 42 |
|
|---|
| 43 |
|
|---|
| 44 |
|
|---|
| 45 |
|
|---|