From 2401301927df4b8ec992c731debe407e0a33a712 Mon Sep 17 00:00:00 2001 From: Eduardo Cavazos Date: Fri, 1 Aug 2008 14:59:53 -0500 Subject: [PATCH] Remove 'processing.color' (evolved into colors) --- extra/processing/color/color.factor | 22 ---------------------- 1 file changed, 22 deletions(-) delete mode 100644 extra/processing/color/color.factor diff --git a/extra/processing/color/color.factor b/extra/processing/color/color.factor deleted file mode 100644 index 50d20fcf52..0000000000 --- a/extra/processing/color/color.factor +++ /dev/null @@ -1,22 +0,0 @@ - -USING: kernel sequences ; - -IN: processing.color - -! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! - -TUPLE: rgba red green blue alpha ; - -C: rgba - -: ( r g b -- rgba ) 1 ; - -: ( gray -- rgba ) dup dup 1 ; - -: {rgb} ( seq -- rgba ) first3 ; - -! : hex>rgba ( hex -- rgba ) - -! : set-gl-color ( color -- ) -! { [ red>> ] [ green>> ] [ blue>> ] [ alpha>> ] } cleave glColor4d ; -