Module GlGtk

module GlGtk: sig .. end

type visual_options = [ `ACCUM_ALPHA_SIZE of int
       | `ACCUM_GREEN_SIZE of int
       | `ALPHA_SIZE of int
       | `AUX_BUFFERS of int
       | `BLUE_SIZE of int
       | `BUFFER_SIZE of int
       | `DEPTH_SIZE of int
       | `DOUBLEBUFFER
       | `GREEN_SIZE of int
       | `LEVEL of int
       | `RED_SIZE of int
       | `RGBA
       | `STENCIL_SIZE of int
       | `STEREO
       | `USE_GL ] 

type gl_area = [ `drawingarea | `glarea | `gtk | `widget ] 

module GtkRaw: sig .. end

class area_signals : [> gl_area ] Gtk.obj -> object .. end

class area : gl_area Gtk.obj -> object .. end

val area : visual_options list ->
       ?share:area ->
       ?width:int ->
       ?height:int ->
       ?packing:(GObj.widget -> unit) -> ?show:bool -> unit -> area

val region_of_raw : 'a Raw.t -> Gpointer.region