2013-04-24 17:17:25 +04:00
|
|
|
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);
|
|
|
|
|
2013-08-21 09:40:21 +04:00
|
|
|
echo("$children scope");
|
|
|
|
module child_module_2() {
|
|
|
|
echo("$children should be 4: ", $children);
|
2014-02-18 07:19:31 +04:00
|
|
|
for(i=[0:$children-1]) children(i);
|
2013-08-21 09:40:21 +04:00
|
|
|
}
|
|
|
|
|
|
|
|
module child_module_1() {
|
|
|
|
echo("$children should be 1: ", $children);
|
|
|
|
child_module_2() {
|
|
|
|
echo("$children should be 1: ", $children);
|
2014-02-18 07:19:31 +04:00
|
|
|
children(0);
|
2013-08-21 09:40:21 +04:00
|
|
|
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();
|
|
|
|
}
|
|
|
|
|
2013-04-24 17:17:25 +04:00
|
|
|
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);
|
2013-06-13 09:26:57 +04:00
|
|
|
|
|
|
|
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();
|