From 4361daded9afcd93addf8222f4b6fa9b42de1c97 Mon Sep 17 00:00:00 2001 From: Camil Staps Date: Tue, 22 Oct 2019 21:55:49 +0200 Subject: Add setText for TextBuffer --- src/Gtk/Internal.icl | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'src/Gtk/Internal.icl') diff --git a/src/Gtk/Internal.icl b/src/Gtk/Internal.icl index 787a2c9..988ab3a 100644 --- a/src/Gtk/Internal.icl +++ b/src/Gtk/Internal.icl @@ -282,6 +282,11 @@ gtk_text_buffer_insert_at_cursor buffer string len env = code { ccall gtk_text_buffer_insert_at_cursor "psI:V:A" } +gtk_text_buffer_set_text :: !Pointer !String !Int !.a -> .a +gtk_text_buffer_set_text buffer string len env = code { + ccall gtk_text_buffer_set_text "psI:V:A" +} + gtk_text_view_new :: !.a -> (!Pointer, !.a) gtk_text_view_new env = code { ccall gtk_text_view_new ":p:A" -- cgit v1.2.3