Last change
on this file since 284 was 284, checked in by bird, 20 years ago |
Current make snaphot, 2005-05-16.
|
-
Property svn:eol-style
set to
native
|
File size:
898 bytes
|
Line | |
---|
1 | # -*-perl-*-
|
---|
2 |
|
---|
3 | $description = "The following test creates a makefile to test MAKE \n"
|
---|
4 | ."(very generic)";
|
---|
5 |
|
---|
6 | $details = "DETAILS";
|
---|
7 |
|
---|
8 | open(MAKEFILE,"> $makefile");
|
---|
9 |
|
---|
10 | # The Contents of the MAKEFILE ...
|
---|
11 |
|
---|
12 | print MAKEFILE "TMP := \$(MAKE)\n";
|
---|
13 | print MAKEFILE "MAKE := \$(subst X=\$(X),,\$(MAKE))\n\n";
|
---|
14 | print MAKEFILE "all:\n";
|
---|
15 | print MAKEFILE "\t\@echo \$(TMP)\n";
|
---|
16 | print MAKEFILE "\t\$(MAKE) -f $makefile foo\n\n";
|
---|
17 | print MAKEFILE "foo:\n";
|
---|
18 | print MAKEFILE "\t\@echo \$(MAKE)\n";
|
---|
19 |
|
---|
20 | # END of Contents of MAKEFILE
|
---|
21 |
|
---|
22 | close(MAKEFILE);
|
---|
23 |
|
---|
24 | # Create the answer to what should be produced by this Makefile
|
---|
25 | $answer = "$mkpath\n$mkpath -f $makefile foo\n"
|
---|
26 | . "${make_name}[1]: Entering directory `$pwd'\n"
|
---|
27 | . "$mkpath\n${make_name}[1]: Leaving directory `$pwd'\n";
|
---|
28 |
|
---|
29 | &run_make_with_options($makefile,"",&get_logfile,0);
|
---|
30 |
|
---|
31 | &rmfiles("foo");
|
---|
32 | # COMPARE RESULTS
|
---|
33 | &compare_output($answer,&get_logfile(1));
|
---|
34 |
|
---|
35 | 1;
|
---|
Note:
See
TracBrowser
for help on using the repository browser.