From 4d9b0222942bd11c490d476ae60f3709017b804b Mon Sep 17 00:00:00 2001
From: Camil Staps
Date: Mon, 21 Oct 2019 10:26:13 +0200
Subject: Add GtkSheet

---
 src/Gtk/Widgets/Sheet/Internal.icl | 11 +++++++++++
 1 file changed, 11 insertions(+)
 create mode 100644 src/Gtk/Widgets/Sheet/Internal.icl

(limited to 'src/Gtk/Widgets/Sheet/Internal.icl')

diff --git a/src/Gtk/Widgets/Sheet/Internal.icl b/src/Gtk/Widgets/Sheet/Internal.icl
new file mode 100644
index 0000000..e0df1e5
--- /dev/null
+++ b/src/Gtk/Widgets/Sheet/Internal.icl
@@ -0,0 +1,11 @@
+implementation module Gtk.Widgets.Sheet.Internal
+
+import System._Pointer
+
+gtk_sheet_new :: !Int !Int !String !.a -> (!Pointer, !.a)
+gtk_sheet_new rows cols title env = new rows cols (packString title) env
+where
+	new :: !Int !Int !String !.a -> (!Pointer, !.a)
+	new _ _ _ _ = code {
+		ccall gtk_sheet_new "IIs:p:A"
+	}
-- 
cgit v1.2.3