summaryrefslogtreecommitdiff
path: root/tests/scripts/features
diff options
context:
space:
mode:
Diffstat (limited to 'tests/scripts/features')
-rw-r--r--tests/scripts/features/default_names36
-rw-r--r--tests/scripts/features/targetvars2
2 files changed, 7 insertions, 31 deletions
diff --git a/tests/scripts/features/default_names b/tests/scripts/features/default_names
index 501f1fc..e53127e 100644
--- a/tests/scripts/features/default_names
+++ b/tests/scripts/features/default_names
@@ -7,59 +7,35 @@ default makefiles in the correct order (GNUmakefile,makefile,Makefile)";
$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).
-#
-if ($port_type eq 'UNIX')
-{
+
+if ($port_type eq 'UNIX') {
# 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);
-
-# Create the answer to what should be produced by this Makefile
-$answer = "It chose GNUmakefile\n";
-
-# COMPARE RESULTS
-
-&compare_output($answer,&get_logfile(1)) || &error("abort");
+&compare_output("It chose GNUmakefile\n",&get_logfile(1));
unlink $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).
-#
-if ($port_type eq 'UNIX')
-{
- $answer = "It chose makefile\n";
-
+if ($port_type eq 'UNIX') {
&run_make_with_options("","",&get_logfile);
-
- &compare_output($answer,&get_logfile(1)) || &error("abort");
+ &compare_output("It chose makefile\n",&get_logfile(1));
unlink "makefile";
}
-$answer = "It chose Makefile\n";
-
&run_make_with_options("","",&get_logfile);
-
-&compare_output($answer,&get_logfile(1)) || &error("abort");
+&compare_output("It chose Makefile\n",&get_logfile(1));
unlink "Makefile";
diff --git a/tests/scripts/features/targetvars b/tests/scripts/features/targetvars
index c22ce13..18dd023 100644
--- a/tests/scripts/features/targetvars
+++ b/tests/scripts/features/targetvars
@@ -272,7 +272,7 @@ $answer = "no build information\n";
# Test a merge of set_lists for files, where one list is much longer
# than the other. See Savannah bug #15757.
-mkdir('t1');
+mkdir('t1', 0777);
touch('t1/rules.mk');
run_make_test('