external backward_delete: [>`text] obj -> int -> unit = 
    "ml_gtk_text_backward_delete"