blob: e0df1e57758559f539a131a482fae929f9d00f9b (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
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"
}
|
