From 5ac34f1598d71e27bf82840c8643f1e808d3e6b2 Mon Sep 17 00:00:00 2001
From: Camil Staps
Date: Mon, 21 Oct 2019 10:25:42 +0200
Subject: Add GtkScrolledWindow

---
 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 ffa801e..9bc0c7b 100644
--- a/src/Gtk/Internal.icl
+++ b/src/Gtk/Internal.icl
@@ -138,6 +138,11 @@ gtk_paned_set_wide_handle paned setting env = code {
 	ccall gtk_paned_set_wide_handle "pI:V:A"
 }
 
+gtk_scrolled_window_new :: !Pointer !Pointer !.a -> (!Pointer, !.a)
+gtk_scrolled_window_new hadjust vadjust env = code {
+	ccall gtk_scrolled_window_new "pp:p:A"
+}
+
 gtk_style_context_add_class :: !Pointer !String !.a -> .a
 gtk_style_context_add_class context cls env = add context (packString cls) env
 where
-- 
cgit v1.2.3