Module Gdk.Color

module Color: sig .. end

val get_system_colormap : unit -> Gdk.colormap

val get_colormap : ?privat:bool -> Gdk.visual -> Gdk.colormap

val get_visual : Gdk.colormap -> Gdk.visual

type spec = [ `BLACK | `NAME of string | `RGB of int * int * int | `WHITE ] 

val alloc : colormap:Gdk.colormap -> spec -> Gdk.color

val red : Gdk.color -> int

val blue : Gdk.color -> int

val green : Gdk.color -> int

val pixel : Gdk.color -> int