mirror of
https://git.savannah.gnu.org/git/make.git
synced 2024-10-24 05:09:58 +00:00
57 lines
1.2 KiB
Perl
57 lines
1.2 KiB
Perl
# -*-perl-*-
|
|
|
|
$description = "\
|
|
This tests random features of the parser that need to be supported, and
|
|
which have either broken at some point in the past or seem likely to
|
|
break.";
|
|
|
|
run_make_test("
|
|
# We want to allow both empty commands _and_ commands that resolve to empty.
|
|
EMPTY =
|
|
|
|
.PHONY: all a1 a2 a3 a4
|
|
all: a1 a2 a3 a4
|
|
|
|
a1:;
|
|
a2:
|
|
\t
|
|
a3:;\$(EMPTY)
|
|
a4:
|
|
\t\$(EMPTY)
|
|
|
|
\# Non-empty lines that expand to nothing should also be ignored.
|
|
STR = \# Some spaces
|
|
TAB = \t \# A TAB and some spaces
|
|
|
|
\$(STR)
|
|
|
|
\$(STR) \$(TAB)",
|
|
'', "#MAKE#: Nothing to be done for `all'.");
|
|
|
|
# TEST 2
|
|
|
|
# Make sure files without trailing newlines are handled properly.
|
|
# Have to use the old style invocation to test this.
|
|
|
|
$makefile2 = &get_tmpfile;
|
|
|
|
open(MAKEFILE, "> $makefile2");
|
|
print MAKEFILE "all:;\@echo FOO = \$(FOO)\nFOO = foo";
|
|
close(MAKEFILE);
|
|
|
|
&run_make_with_options($makefile2,"",&get_logfile);
|
|
$answer = "FOO = foo\n";
|
|
&compare_output($answer,&get_logfile(1));
|
|
|
|
# TEST 3
|
|
|
|
# Check semicolons in variable references
|
|
|
|
run_make_test('
|
|
$(if true,$(info true; true))
|
|
all: ; @:
|
|
',
|
|
'', 'true; true');
|
|
|
|
1;
|