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
|
echo("special variable inheritance");
module special_module(a) {
echo(a, $fn);
special_module2(a);
}
module special_module2(b) {
echo(a);
echo(b, $fn);
}
special_module(23, $fn=5);
echo("$children scope");
module child_module_2() {
echo("$children should be 4: ", $children);
for(i=[0:$children-1]) child(i);
}
module child_module_1() {
echo("$children should be 1: ", $children);
child_module_2() {
echo("$children should be 1: ", $children);
child(0);
echo("child_module_2 child 0");
echo("child_module_2 child 1");
}
}
child_module_1() echo("child_module_1 child");
echo("copy $children");
module copy_children_module() {
kids = $children;
echo("copy_children_module: ", kids, $children);
}
copy_children_module() {
cube();
sphere();
}
echo("inner variables shadows parameter");
module inner_variables(a, b) {
b = 24;
echo(a, b);
}
inner_variables(5, 6);
echo("user-defined special variables as parameter");
module user_defined_special($b) {
echo($b);
user_defined_special2();
}
module user_defined_special2() {
echo($b);
}
user_defined_special(7);
echo("assign only visible in children's scope");
module assigning() {
echo(c);
}
module assigning2(c) {
echo(c);
}
assign(c=5) {
assigning();
assigning2(c);
}
echo("undeclared variable can still be passed and used");
module undeclared_var() {
echo(d);
}
undeclared_var(d=6);
echo("attempt to assign from a not-yet-defined variable which also exists globally");
globalval = 1;
// Test that b = a turns into b = 1, heeding the order of the assignments
// See issue #399 for more discussion
module global_lookup() {
b = globalval; // Should be assigned 1 since the local one isn't yet defined
globalval = 5; // Overrides the value for the local scope only
echo(globalval,b); // Should output 5, 1
}
global_lookup();
|
