diff options
Diffstat (limited to 'tests')
-rw-r--r-- | tests/dimension/directives.pov | 12 | ||||
-rwxr-xr-x | tests/dimension/directives.sh | 16 |
2 files changed, 28 insertions, 0 deletions
diff --git a/tests/dimension/directives.pov b/tests/dimension/directives.pov index 089622c..5c3cfa3 100644 --- a/tests/dimension/directives.pov +++ b/tests/dimension/directives.pov @@ -64,6 +64,18 @@ Inc(Counter) #end +// Test macro parameters with the same name as existing variables +#declare Test1 = 0; +#declare Test2 = 1; +#declare Test3 = 2; +#macro ScopeTest(Test1, Test2, Test3) + #declare Test1 = Test2 - Test3; +#end +ScopeTest(Test1, Test3, Test2) +sphere { + 0, Test1 +} + #declare Box = box { <-1, -1, -1>, <1, 1, 1> diff --git a/tests/dimension/directives.sh b/tests/dimension/directives.sh index 7c66263..9e3974a 100755 --- a/tests/dimension/directives.sh +++ b/tests/dimension/directives.sh @@ -56,6 +56,17 @@ directives_exp="$(echo -n \ (identifier "Inc") \( (identifier "Counter") \) #end + #declare (identifier "Test1") = (integer "0") ; + #declare (identifier "Test2") = (integer "1") ; + #declare (identifier "Test3") = (integer "2") ; + #macro (identifier "ScopeTest") \( (identifier "Test1") , (identifier "Test2") , (identifier "Test3") \) + #declare (identifier "Test1") = (identifier "Test2") - (identifier "Test3") ; + #end + (identifier "ScopeTest") \( (identifier "Test1") , (identifier "Test3") , (identifier "Test2") \) + sphere { + (integer "0") , (identifier "Test1") + } + #declare (identifier "Box") = box { < - (integer "1") , - (integer "1") , - (integer "1") > , @@ -90,6 +101,11 @@ $(echo -n \ (vector (integer 1) (integer 1) (integer 1) (integer 0) (integer 0)) pigment-modifiers))) (object + (sphere + (vector (integer 0) (integer 0) (integer 0) (integer 0) (integer 0)) + (integer 1)) + object-modifiers) + (object (box (vector (integer -1) (integer -1) (integer -1) (integer 0) (integer 0)) (vector (integer 1) (integer 1) (integer 1) (integer 0) (integer 0))) |