Module Glib.Main

module Main: sig .. end

type t 

val create : bool -> t

val iteration : bool -> bool

val pending : unit -> bool

val is_running : t -> bool

val quit : t -> unit

val destroy : t -> unit

type locale_category = [ `ALL | `COLLATE | `CTYPE | `MESSAGES | `MONETARY | `NUMERIC | `TIME ] 

val setlocale : locale_category -> string option -> string

val wrap_poll_func : unit -> unit