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
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
|
function(report where)
message("----------")
message("variable values at ${where}:")
foreach(var IN ITEMS
top_implicit_inner_set top_implicit_inner_unset
top_explicit_inner_set top_explicit_inner_unset top_explicit_inner_tounset
top_implicit_outer_set top_explicit_outer_unset
top_explicit_outer_set top_explicit_outer_unset top_explicit_outer_tounset
outer_implicit_inner_set outer_implicit_inner_unset
outer_explicit_inner_set outer_explicit_inner_unset outer_explicit_inner_tounset)
if(DEFINED ${var})
message("${var}: -->${${var}}<--")
else()
message("${var}: <undefined>")
endif()
endforeach()
message("----------")
endfunction()
macro(set_values upscope downscope value)
# Pull the value in implicitly.
set(dummy ${${upscope}_implicit_${downscope}_set})
set(dummy ${${upscope}_implicit_${downscope}_unset})
# Pull it down explicitly.
set(${upscope}_explicit_${downscope}_set "${value}" PARENT_SCOPE)
set(${upscope}_explicit_${downscope}_unset "${value}" PARENT_SCOPE)
set(${upscope}_explicit_${downscope}_tounset PARENT_SCOPE)
endmacro()
function(inner)
report("inner start")
set_values(top inner inner)
set_values(outer inner inner)
report("inner end")
endfunction()
function(outer)
report("outer start")
set_values(top outer outer)
# Set values for inner to manipulate.
set(outer_implicit_inner_set outer)
set(outer_implicit_inner_unset)
set(outer_explicit_inner_set outer)
set(outer_explicit_inner_unset)
set(outer_explicit_inner_tounset outer)
report("outer before inner")
inner()
report("outer after inner")
# Do what inner does so that we can test the values that inner should have
# pulled through to here.
set_values(top inner outer)
report("outer end")
endfunction()
# variable name is:
#
# <upscope>_<pulltype>_<downscope>_<settype>
#
# where the value is the name of the scope it was set in. The scopes available
# are "top", "outer", and "inner". The pull type may either be "implicit" or
# "explicit" based on whether the pull is due to a variable dereference or a
# PARENT_SCOPE setting. The settype is "set" where both scopes set a value,
# "unset" where upscope unsets it and downscope sets it, and "tounset" where
# upscope sets it and downscope unsets it.
#
# We test the following combinations:
#
# - outer overriding top's values;
# - inner overriding top's values;
# - inner overriding outer's values; and
# - outer overriding inner's values in top after inner has run.
# Set values for inner to manipulate.
set(top_implicit_inner_set top)
set(top_implicit_inner_unset)
set(top_explicit_inner_set top)
set(top_explicit_inner_unset)
set(top_explicit_inner_tounset top)
# Set values for outer to manipulate.
set(top_implicit_outer_set top)
set(top_implicit_outer_unset)
set(top_explicit_outer_set top)
set(top_explicit_outer_unset)
set(top_explicit_outer_tounset top)
report("top before calls")
outer()
report("top after calls")
|
