tests/scripts/functions/flavor


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44

#                                                                    -*-perl-*-
$description = "Test the flavor function.";

$details = "";


# Test #1: Test general logic.
#
run_make_test('
s := s
r = r

$(info u $(flavor u))
$(info s $(flavor s))
$(info r $(flavor r))

ra += ra
rc ?= rc

$(info ra $(flavor ra))
$(info rc $(flavor rc))

s += s
r += r

$(info s $(flavor s))
$(info r $(flavor r))


.PHONY: all
all:;@:
',
'',
'u undefined
s simple
r recursive
ra recursive
rc recursive
s simple
r recursive');


# This tells the test driver that the perl test script executed properly.
1;