external get_version : unit -> int * int * int = "ml_gtk_get_version"