1999-09-17 03:15:37 +00:00
|
|
|
# -*-perl-*-
|
|
|
|
|
1999-09-14 02:03:19 +00:00
|
|
|
$description = "This script tests to make sure that Make looks for
|
|
|
|
default makefiles in the correct order (GNUmakefile,makefile,Makefile)";
|
|
|
|
|
|
|
|
# Create a makefile called "GNUmakefile"
|
|
|
|
$makefile = "GNUmakefile";
|
|
|
|
|
|
|
|
open(MAKEFILE,"> $makefile");
|
|
|
|
print MAKEFILE "FIRST: ; \@echo It chose GNUmakefile\n";
|
|
|
|
close(MAKEFILE);
|
|
|
|
|
|
|
|
# DOS/WIN32 platforms preserve case, but Makefile is the same file as makefile.
|
|
|
|
# Just test what we can here (avoid Makefile versus makefile test).
|
2006-03-08 20:15:08 +00:00
|
|
|
|
|
|
|
if ($port_type eq 'UNIX') {
|
1999-09-14 02:03:19 +00:00
|
|
|
# Create another makefile called "makefile"
|
|
|
|
open(MAKEFILE,"> makefile");
|
|
|
|
print MAKEFILE "SECOND: ; \@echo It chose makefile\n";
|
|
|
|
close(MAKEFILE);
|
|
|
|
}
|
|
|
|
|
|
|
|
# Create another makefile called "Makefile"
|
|
|
|
open(MAKEFILE,"> Makefile");
|
|
|
|
print MAKEFILE "THIRD: ; \@echo It chose Makefile\n";
|
|
|
|
close(MAKEFILE);
|
|
|
|
|
|
|
|
|
|
|
|
&run_make_with_options("","",&get_logfile);
|
2006-03-08 20:15:08 +00:00
|
|
|
&compare_output("It chose GNUmakefile\n",&get_logfile(1));
|
1999-09-14 02:03:19 +00:00
|
|
|
unlink $makefile;
|
|
|
|
|
2006-03-08 20:15:08 +00:00
|
|
|
if ($port_type eq 'UNIX') {
|
1999-09-14 02:03:19 +00:00
|
|
|
&run_make_with_options("","",&get_logfile);
|
2006-03-08 20:15:08 +00:00
|
|
|
&compare_output("It chose makefile\n",&get_logfile(1));
|
1999-09-14 02:03:19 +00:00
|
|
|
unlink "makefile";
|
|
|
|
}
|
|
|
|
|
|
|
|
&run_make_with_options("","",&get_logfile);
|
2006-03-08 20:15:08 +00:00
|
|
|
&compare_output("It chose Makefile\n",&get_logfile(1));
|
1999-09-14 02:03:19 +00:00
|
|
|
unlink "Makefile";
|