colors: minor change
parent
463b3ff87d
commit
ba61e15689
|
@ -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>> ;
|
||||
|
||||
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
||||
|
||||
|
|
Loading…
Reference in New Issue