external _gtklist_init : unit -> unit = "ml_gtklist_init"