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"
	}