colors: merge colors.constants and colors.hex.

[factor.git] / basis / colors / yiq / yiq-tests.factor

diff --git a/basis/colors/yiq/yiq-tests.factor b/basis/colors/yiq/yiq-tests.factor
index 63abda17082917fcad22c56af1166a3ca94bd8dd..543e41280f8e4ac502a3c256006d8d7563860b45 100644 (file)
--- a/basis/colors/yiq/yiq-tests.factor
+++ b/basis/colors/yiq/yiq-tests.factor
@@ -8,9 +8,7 @@ ranges sequences tools.test ;
     0.0 1.0 0.1 <range> [| r |
         0.0 1.0 0.1 <range> [| g |
             0.0 1.0 0.1 <range> [| b |
-                r g b 1.0 <rgba> dup >yiqa >rgba
-                [ >rgba-components 4array ] bi@
-                [ 0.00000001 ~ ] 2all?
+                r g b 1.0 <rgba> dup >yiqa color=
             ] all?
         ] all?
     ] all?