`sig
external cut_clipboard : [> GnomeCanvas.rich_text ] Gobject.obj -> unit
= "ml_gnome_canvas_rich_text_cut_clipboard"
external copy_clipboard : [> GnomeCanvas.rich_text ] Gobject.obj -> unit
= "ml_gnome_canvas_rich_text_copy_clipboard"
external paste_clipboard : [> GnomeCanvas.rich_text ] Gobject.obj -> unit
= "ml_gnome_canvas_rich_text_paste_clipboard"
external get_buffer :
[> GnomeCanvas.rich_text ] Gobject.obj -> Gtk.text_buffer
= "ml_gnome_canvas_rich_text_get_buffer"
end`