diff options
Diffstat (limited to 'src/Gtk/Widgets/Sheet/Internal.icl')
| -rw-r--r-- | src/Gtk/Widgets/Sheet/Internal.icl | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/src/Gtk/Widgets/Sheet/Internal.icl b/src/Gtk/Widgets/Sheet/Internal.icl index 5f45cfc..69459b6 100644 --- a/src/Gtk/Widgets/Sheet/Internal.icl +++ b/src/Gtk/Widgets/Sheet/Internal.icl @@ -106,6 +106,16 @@ gtk_sheet_cell_delete sheet row col env = code { ccall gtk_sheet_cell_delete "pII:V:A" } +gtk_sheet_get_active_cell :: !Pointer !.a -> (!(!Int, !Int), !.a) +gtk_sheet_get_active_cell sheet env = code { + ccall gtk_sheet_get_active_cell "p:VII:A" +} + +gtk_sheet_set_active_cell :: !Pointer !Int !Int !.a -> .a +gtk_sheet_set_active_cell sheet row col env = code { + ccall gtk_sheet_set_active_cell "pII:V:A" +} + gtk_sheet_set_cell_text :: !Pointer !Int !Int !String !.a -> .a gtk_sheet_set_cell_text sheet row col text env = set sheet row col (packString text) env where |