colors: these should be instances of color.

diff --git a/basis/colors/lab/lab.factor b/basis/colors/lab/lab.factor
index 044bc7139abb6052b04afbc853fdd9bc92150eb1..5b3a6830b9d114dd6faa634e89b1558cbc2663da 100644 (file)
--- a/basis/colors/lab/lab.factor
+++ b/basis/colors/lab/lab.factor
@@ -10,6 +10,8 @@ TUPLE: laba l a b alpha ;
 
 C: <laba> laba
 
+INSTANCE: laba color
+
 M: laba >rgba >xyza >rgba ;
 
 M: laba >xyza

diff --git a/basis/colors/lch/lch.factor b/basis/colors/lch/lch.factor
index 74c46776baad7219afc090455e4efd110b238cc8..c993956a654573be8229e7f96b69f91a6bcfb5a9 100644 (file)
--- a/basis/colors/lch/lch.factor
+++ b/basis/colors/lch/lch.factor
@@ -10,6 +10,8 @@ TUPLE: LCHuv l c h alpha ;
 
 C: <LCHuv> LCHuv
 
+INSTANCE: LCHuv collor
+
 M: LCHuv >rgba >luva >rgba ;
 
 M: LCHuv >xyza >luva >xyza ;
@@ -50,6 +52,8 @@ TUPLE: LCHab l c h alpha ;
 
 C: <LCHab> LCHab
 
+INSTANCE: LCHab color
+
 M: LCHab >rgba >laba >rgba ;
 
 M: LCHab >laba

diff --git a/basis/colors/luv/luv.factor b/basis/colors/luv/luv.factor
index 5f104b2ffc14db3b1a99e519279c07aca9d13e35..4e51662f1a75f6fe90c10f9c2cdfa3f1fc8d4ef9 100644 (file)
--- a/basis/colors/luv/luv.factor
+++ b/basis/colors/luv/luv.factor
@@ -10,6 +10,8 @@ TUPLE: luva l u v alpha ;
 
 C: <luva> luva
 
+INSTANCE: luva color
+
 <PRIVATE
 
 :: xyz-to-uv ( x y z -- u v )

diff --git a/basis/colors/xyy/xyy.factor b/basis/colors/xyy/xyy.factor
index ef7cbc3426fa86c7b7ea8e69340d95e09f90f9bf..0fefc3e4190716dafe4e83a9cbe9618836ba589a 100644 (file)
--- a/basis/colors/xyy/xyy.factor
+++ b/basis/colors/xyy/xyy.factor
@@ -9,6 +9,8 @@ TUPLE: xyYa x y Y alpha ;
 
 C: <xyYa> xyYa
 
+INSTANCE: xyYa color
+
 M: xyYa >rgba
     >xyza >rgba ;
 

diff --git a/basis/colors/xyz/xyz.factor b/basis/colors/xyz/xyz.factor
index 6b36a60bff792bbd26c4b8acf0d3797d87c9c018..5bbb5e6c53fb150beb4bc8cb2f88eb69da727849 100644 (file)
--- a/basis/colors/xyz/xyz.factor
+++ b/basis/colors/xyz/xyz.factor
@@ -10,6 +10,8 @@ TUPLE: xyza x y z alpha ;
 
 C: <xyza> xyza
 
+INSTANCE: xyza color
+
 <PRIVATE
 
 CONSTANT: xyz_epsilon 216/24389