From b06163ae767f945dd91c5709872b5566a9ec4aea Mon Sep 17 00:00:00 2001 From: Camil Staps Date: Sun, 27 Oct 2019 13:14:06 +0100 Subject: Add GtkSeparator --- 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 e3982dd..6f54acc 100644 --- a/src/Gtk/Internal.icl +++ b/src/Gtk/Internal.icl @@ -281,6 +281,11 @@ gtk_scrolled_window_new hadjust vadjust env = code { ccall gtk_scrolled_window_new "pp:p:A" } +gtk_separator_new :: !Bool !.a -> (!Pointer, !.a) +gtk_separator_new vertical env = code { + ccall gtk_separator_new "I:p:A" +} + gtk_spinner_new :: !.a -> (!Pointer, !.a) gtk_spinner_new env = code { ccall gtk_spinner_new ":p:A" -- cgit v1.2.3