external _gtkedit_init : unit -> unit = "ml_gtkedit_init"