external set_point : [>`text] obj -> int -> unit
      = "ml_gtk_text_set_point"