From d6cfecdc224e95f1379f918d642074eada40627f Mon Sep 17 00:00:00 2001
From: Tavian Barnes <tavianator@gmail.com>
Date: Tue, 23 Nov 2010 13:14:16 -0500
Subject: Implement pigment maps.

---
 tests/dimension/demo.pov |  9 ++++++++-
 tests/dimension/demo.sh  | 22 +++++++++++++++++-----
 2 files changed, 25 insertions(+), 6 deletions(-)

(limited to 'tests/dimension')

diff --git a/tests/dimension/demo.pov b/tests/dimension/demo.pov
index 8088f45..c65c842 100644
--- a/tests/dimension/demo.pov
+++ b/tests/dimension/demo.pov
@@ -132,7 +132,14 @@ union {
 plane {
   y, -2
   pigment {
-    checker color rgb 0, color rgb 1
+    checker
+    pigment {
+      color rgb 1
+    }
+    pigment {
+      checker color rgb 0, color rgb 1
+      scale 1/3
+    }
     quick_color rgb <1, 0.5, 0.75>
   }
 }
diff --git a/tests/dimension/demo.sh b/tests/dimension/demo.sh
index a741268..80d5ade 100755
--- a/tests/dimension/demo.sh
+++ b/tests/dimension/demo.sh
@@ -189,11 +189,23 @@ demo_exp=$(echo -n \
           (quick_color
             (vector (integer 1) (float 0.5) (float 0.75)
                     (integer 0) (integer 0)))
-          (color-list
-            (vector (integer 0) (integer 0) (integer 0)
-                    (integer 0) (integer 0))
-            (vector (integer 1) (integer 1) (integer 1)
-                    (integer 0) (integer 0))))))))' \
+          (pigment-list
+            (pigment
+              (vector (integer 1) (integer 1) (integer 1)
+                      (integer 0) (integer 0))
+              pigment-modifiers)
+            (pigment
+              (pattern checker)
+              (pigment-modifiers
+                (transformation
+                  (scale (vector (float 0.333333) (float 0.333333)
+                                 (float 0.333333) (float 0.333333)
+                                 (float 0.333333))))
+                (color-list
+                  (vector (integer 0) (integer 0) (integer 0)
+                          (integer 0) (integer 0))
+                  (vector (integer 1) (integer 1) (integer 1)
+                          (integer 0) (integer 0)))))))))))' \
 | tr '\n' ' ' | sed -r 's/[[:space:]]+/ /g')
 
 if [ "$demo" != "$demo_exp" ]; then
-- 
cgit v1.2.3