`sig
type w
type widget = Togl.w Widget.widget
val render : Togl.widget -> unit
val swap_buffers : Togl.widget -> unit
val height : Togl.widget -> int
val width : Togl.widget -> int
type font =
[ `Fixed_8x13
| `Fixed_9x15
| `Helvetica_10
| `Helvetica_12
| `Helvetica_18
| `Times_10
| `Times_24
| `Xfont of string ]
val load_bitmap_font : Togl.widget -> font:Togl.font -> GlList.base
val unload_bitmap_font : Togl.widget -> base:GlList.base -> unit
val use_layer : Togl.widget -> num:int -> unit
val show_overlay : Togl.widget -> unit
val hide_overlay : Togl.widget -> unit
val overlay_redisplay : Togl.widget -> unit
val exists_overlay : Togl.widget -> bool
val get_overlay_transparent_value : Togl.widget -> int
val make_current : Togl.widget -> unit
val display_func : Togl.widget -> cb:(unit -> unit) -> unit
val reshape_func : Togl.widget -> cb:(unit -> unit) -> unit
val overlay_display_func : Togl.widget -> cb:(unit -> unit) -> unit
val dump_to_eps_file :
filename:string ->
?rgba:bool -> ?render:(unit -> unit) -> Togl.widget -> unit
val timer_func : ms:int -> cb:(unit -> unit) -> unit
val configure : ?height:int -> ?width:int -> Togl.widget -> string
val create :
?name:string ->
?accum:bool ->
?accumalphasize:int ->
?accumbluesize:int ->
?accumgreensize:int ->
?accumredsize:int ->
?alpha:bool ->
?alphasize:int ->
?auxbuffers:int ->
?bluesize:int ->
?depth:bool ->
?depthsize:int ->
?double:bool ->
?greensize:int ->
?height:int ->
?overlay:bool ->
?privatecmap:bool ->
?redsize:int ->
?rgba:bool ->
?stencil:bool ->
?stencilsize:int ->
?stereo:bool -> ?width:int -> 'a Widget.widget -> Togl.widget
end`