diff --git a/extra/colors/colors.factor b/extra/colors/colors.factor index e3920bebe3..ae3695cf8b 100644 --- a/extra/colors/colors.factor +++ b/extra/colors/colors.factor @@ -29,9 +29,9 @@ M: gray >rgba ( gray -- rgba ) [ gray>> dup dup ] [ alpha>> ] bi rgba boa ; M: array >rgba ( array -- rgba ) first4 rgba boa ; -M: color ( color -- red ) red>> >rgba red>> ; -M: color ( color -- green ) green>> >rgba green>> ; -M: color ( color -- blue ) blue>> >rgba blue>> ; +M: color red>> ( color -- red ) >rgba red>> ; +M: color green>> ( color -- green ) >rgba green>> ; +M: color blue>> ( color -- blue ) >rgba blue>> ; ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!