mirror of
https://github.com/mirror/make.git
synced 2025-01-10 12:20:18 +08:00
8bbdbb02b3
Implemented enhancement #1391: allow "export" in target-specific variable definitions. Change the Info name of the "Automatic" node to "Automatic Variables". Add text clarifying the scope of automatic variables to that section.
252 lines
5.7 KiB
Perl
252 lines
5.7 KiB
Perl
# -*-perl-*-
|
|
$description = "Test target-specific variable settings.";
|
|
|
|
$details = "\
|
|
Create a makefile containing various flavors of target-specific variable
|
|
values, override and non-override, and using various variable expansion
|
|
rules, semicolon interference, etc.";
|
|
|
|
open(MAKEFILE,"> $makefile");
|
|
|
|
print MAKEFILE <<'EOF';
|
|
SHELL = /bin/sh
|
|
export FOO = foo
|
|
export BAR = bar
|
|
one: override FOO = one
|
|
one two: ; @echo $(FOO) $(BAR)
|
|
two: BAR = two
|
|
three: ; BAR=1000
|
|
@echo $(FOO) $(BAR)
|
|
# Some things that shouldn't be target vars
|
|
funk : override
|
|
funk : override adelic
|
|
adelic override : ; echo $@
|
|
# Test per-target recursive variables
|
|
four:FOO=x
|
|
four:VAR$(FOO)=ok
|
|
four: ; @echo '$(FOO) $(VAR$(FOO)) $(VAR) $(VARx)'
|
|
five:FOO=x
|
|
five six : VAR$(FOO)=good
|
|
five six: ;@echo '$(FOO) $(VAR$(FOO)) $(VAR) $(VARx) $(VARfoo)'
|
|
# Test per-target variable inheritance
|
|
seven: eight
|
|
seven eight: ; @echo $@: $(FOO) $(BAR)
|
|
seven: BAR = seven
|
|
seven: FOO = seven
|
|
eight: BAR = eight
|
|
# Test the export keyword with per-target variables
|
|
nine: ; @echo $(FOO) $(BAR) $$FOO $$BAR
|
|
nine: FOO = wallace
|
|
nine-a: export BAZ = baz
|
|
nine-a: ; @echo $$BAZ
|
|
# Test = escaping
|
|
EQ = =
|
|
ten: one\=two
|
|
ten: one \= two
|
|
ten one$(EQ)two $(EQ):;@echo $@
|
|
.PHONY: one two three four five six seven eight nine ten $(EQ) one$(EQ)two
|
|
# Test target-specific vars with pattern/suffix rules
|
|
QVAR = qvar
|
|
RVAR = =
|
|
%.q : ; @echo $(QVAR) $(RVAR)
|
|
foo.q : RVAR += rvar
|
|
# Target-specific vars with multiple LHS pattern rules
|
|
%.r %.s %.t: ; @echo $(QVAR) $(RVAR) $(SVAR) $(TVAR)
|
|
foo.r : RVAR += rvar
|
|
foo.t : TVAR := $(QVAR)
|
|
EOF
|
|
|
|
close(MAKEFILE);
|
|
|
|
# TEST #1
|
|
|
|
&run_make_with_options($makefile, "one two three", &get_logfile);
|
|
$answer = "one bar\nfoo two\nBAR=1000\nfoo bar\n";
|
|
&compare_output($answer,&get_logfile(1));
|
|
|
|
# TEST #2
|
|
|
|
&run_make_with_options($makefile, "one two FOO=1 BAR=2", &get_logfile);
|
|
$answer = "one 2\n1 2\n";
|
|
&compare_output($answer,&get_logfile(1));
|
|
|
|
# TEST #3
|
|
|
|
&run_make_with_options($makefile, "four", &get_logfile);
|
|
$answer = "x ok ok\n";
|
|
&compare_output($answer,&get_logfile(1));
|
|
|
|
# TEST #4
|
|
|
|
&run_make_with_options($makefile, "seven", &get_logfile);
|
|
$answer = "eight: seven eight\nseven: seven seven\n";
|
|
&compare_output($answer,&get_logfile(1));
|
|
|
|
# TEST #5
|
|
|
|
&run_make_with_options($makefile, "nine", &get_logfile);
|
|
$answer = "wallace bar wallace bar\n";
|
|
&compare_output($answer,&get_logfile(1));
|
|
|
|
# TEST #5-a
|
|
|
|
&run_make_with_options($makefile, "nine-a", &get_logfile);
|
|
$answer = "baz\n";
|
|
&compare_output($answer,&get_logfile(1));
|
|
|
|
# TEST #6
|
|
|
|
&run_make_with_options($makefile, "ten", &get_logfile);
|
|
$answer = "one=two\none bar\n=\nfoo two\nten\n";
|
|
&compare_output($answer,&get_logfile(1));
|
|
|
|
# TEST #6
|
|
|
|
&run_make_with_options($makefile, "foo.q bar.q", &get_logfile);
|
|
$answer = "qvar = rvar\nqvar =\n";
|
|
&compare_output($answer,&get_logfile(1));
|
|
|
|
# TEST #7
|
|
|
|
&run_make_with_options($makefile, "foo.t bar.s", &get_logfile);
|
|
$answer = "qvar = qvar\nqvar =\n";
|
|
&compare_output($answer,&get_logfile(1));
|
|
|
|
|
|
# TEST #8
|
|
# For PR/1378: Target-specific vars don't inherit correctly
|
|
|
|
$makefile2 = &get_tmpfile;
|
|
|
|
open(MAKEFILE,"> $makefile2");
|
|
print MAKEFILE <<'EOF';
|
|
foo: FOO = foo
|
|
bar: BAR = bar
|
|
foo: bar
|
|
bar: baz
|
|
baz: ; @echo $(FOO) $(BAR)
|
|
EOF
|
|
close(MAKEFILE);
|
|
|
|
&run_make_with_options("$makefile2", "", &get_logfile);
|
|
$answer = "foo bar\n";
|
|
&compare_output($answer, &get_logfile(1));
|
|
|
|
# TEST #9
|
|
# For PR/1380: Using += assignment in target-specific variables sometimes fails
|
|
# Also PR/1831
|
|
|
|
$makefile3 = &get_tmpfile;
|
|
|
|
open(MAKEFILE,"> $makefile3");
|
|
print MAKEFILE <<'EOF';
|
|
.PHONY: all one
|
|
all: FOO += baz
|
|
all: one; @echo $(FOO)
|
|
|
|
FOO = bar
|
|
|
|
one: FOO += biz
|
|
one: FOO += boz
|
|
one: ; @echo $(FOO)
|
|
EOF
|
|
close(MAKEFILE);
|
|
|
|
&run_make_with_options("$makefile3", "", &get_logfile);
|
|
$answer = "bar baz biz boz\nbar baz\n";
|
|
&compare_output($answer, &get_logfile(1));
|
|
|
|
# Test #10
|
|
|
|
&run_make_with_options("$makefile3", "one", &get_logfile);
|
|
$answer = "bar biz boz\n";
|
|
&compare_output($answer, &get_logfile(1));
|
|
|
|
# Test #11
|
|
# PR/1709: Test semicolons in target-specific variable values
|
|
|
|
$makefile4 = &get_tmpfile;
|
|
|
|
open(MAKEFILE, "> $makefile4");
|
|
print MAKEFILE <<'EOF';
|
|
foo : FOO = ; ok
|
|
foo : ; @echo '$(FOO)'
|
|
EOF
|
|
close(MAKEFILE);
|
|
|
|
&run_make_with_options("$makefile4", "", &get_logfile);
|
|
$answer = "; ok\n";
|
|
&compare_output($answer, &get_logfile(1));
|
|
|
|
# Test #12
|
|
# PR/2020: More hassles with += target-specific vars. I _really_ think
|
|
# I nailed it this time :-/.
|
|
|
|
$makefile5 = &get_tmpfile;
|
|
|
|
open(MAKEFILE, "> $makefile5");
|
|
print MAKEFILE <<'EOF';
|
|
.PHONY: a
|
|
|
|
BLAH := foo
|
|
COMMAND = echo $(BLAH)
|
|
|
|
a: ; @$(COMMAND)
|
|
|
|
a: BLAH := bar
|
|
a: COMMAND += snafu $(BLAH)
|
|
EOF
|
|
close(MAKEFILE);
|
|
|
|
&run_make_with_options("$makefile5", "", &get_logfile);
|
|
$answer = "bar snafu bar\n";
|
|
&compare_output($answer, &get_logfile(1));
|
|
|
|
# Test #13
|
|
# Test double-colon rules with target-specific variable values
|
|
|
|
$makefile6 = &get_tmpfile;
|
|
|
|
open(MAKEFILE, "> $makefile6");
|
|
print MAKEFILE <<'EOF';
|
|
W = bad
|
|
X = bad
|
|
foo: W = ok
|
|
foo:: ; @echo $(W) $(X) $(Y) $(Z)
|
|
foo:: ; @echo $(W) $(X) $(Y) $(Z)
|
|
foo: X = ok
|
|
|
|
Y = foo
|
|
bar: foo
|
|
bar: Y = bar
|
|
|
|
Z = nopat
|
|
ifdef PATTERN
|
|
fo% : Z = pat
|
|
endif
|
|
|
|
EOF
|
|
close(MAKEFILE);
|
|
|
|
&run_make_with_options("$makefile6", "foo", &get_logfile);
|
|
$answer = "ok ok foo nopat\nok ok foo nopat\n";
|
|
&compare_output($answer, &get_logfile(1));
|
|
|
|
# Test #14
|
|
# Test double-colon rules with target-specific variable values and
|
|
# inheritance
|
|
|
|
&run_make_with_options("$makefile6", "bar", &get_logfile);
|
|
$answer = "ok ok bar nopat\nok ok bar nopat\n";
|
|
&compare_output($answer, &get_logfile(1));
|
|
|
|
# Test #15
|
|
# Test double-colon rules with pattern-specific variable values
|
|
|
|
&run_make_with_options("$makefile6", "foo PATTERN=yes", &get_logfile);
|
|
$answer = "ok ok foo pat\nok ok foo pat\n";
|
|
&compare_output($answer, &get_logfile(1));
|
|
|
|
|
|
1;
|