add color>hex

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

diff --git a/basis/colors/colors-tests.factor b/basis/colors/colors-tests.factor
index e8e1763d3b804a187d6512744522cfc93f486fb9..18a69b2ad197ce9f37da692debfd88a908db2679 100644 (file)
--- a/basis/colors/colors-tests.factor
+++ b/basis/colors/colors-tests.factor
@@ -18,3 +18,8 @@ ${ "ABCDEF" hex>rgba } [ COLOR: #abcdef value>> ] unit-test
 ${ "cafebabe" hex>rgba } [ COLOR: #cafebabe value>> ] unit-test
 ${ "112233" hex>rgba } [ COLOR: #112233 value>> ] unit-test
 ${ "11223344" hex>rgba } [ COLOR: #11223344 value>> ] unit-test
+
+{ "#00000000" } [ transparent color>hex ] unit-test
+{ "#cafebabe" } [ COLOR: #cafebabe color>hex ] unit-test
+{ "#112233" } [ COLOR: #112233 color>hex ] unit-test
+{ "#11223344" } [ COLOR: #11223344 color>hex ] unit-test