DEFINITION MODULE FOR "C" GtkGrid ;

(*
   m2-GTK4 - GtkGrid: a table-like container.  Mapped onto
   <gtk/gtkgrid.h>.

   Children are placed with gtk_grid_attach(child, column, row, width,
   height); a widget may span several cells.  Rows and columns size
   themselves to their content unless made homogeneous.
*)

FROM SYSTEM IMPORT ADDRESS;
FROM GtkEnums IMPORT GtkPositionType;

EXPORT UNQUALIFIED
   GtkGrid,
   gtk_grid_new,
   gtk_grid_attach, gtk_grid_attach_next_to, gtk_grid_remove,
   gtk_grid_get_child_at,
   gtk_grid_insert_row, gtk_grid_insert_column,
   gtk_grid_set_row_spacing, gtk_grid_set_column_spacing,
   gtk_grid_get_row_spacing, gtk_grid_get_column_spacing,
   gtk_grid_set_row_homogeneous, gtk_grid_set_column_homogeneous;


TYPE
   GtkGrid = ADDRESS;

(* GtkWidget *gtk_grid_new(void) *)
PROCEDURE gtk_grid_new () : GtkGrid;

(* void gtk_grid_attach(GtkGrid *grid, GtkWidget *child,
                         int column, int row, int width, int height) *)
PROCEDURE gtk_grid_attach (grid: GtkGrid; child: ADDRESS;
                           column, row, width, height: INTEGER);

(* void gtk_grid_attach_next_to(GtkGrid *grid, GtkWidget *child,
                                 GtkWidget *sibling, GtkPositionType side,
                                 int width, int height) *)
PROCEDURE gtk_grid_attach_next_to (grid: GtkGrid; child: ADDRESS;
                                   sibling: ADDRESS; side: GtkPositionType;
                                   width, height: INTEGER);

(* void gtk_grid_remove(GtkGrid *grid, GtkWidget *child) *)
PROCEDURE gtk_grid_remove (grid: GtkGrid; child: ADDRESS);

(* GtkWidget *gtk_grid_get_child_at(GtkGrid *grid, int column, int row) *)
PROCEDURE gtk_grid_get_child_at (grid: GtkGrid;
                                 column, row: INTEGER) : ADDRESS;

(* void gtk_grid_insert_row(GtkGrid *grid, int position) *)
PROCEDURE gtk_grid_insert_row (grid: GtkGrid; position: INTEGER);

(* void gtk_grid_insert_column(GtkGrid *grid, int position) *)
PROCEDURE gtk_grid_insert_column (grid: GtkGrid; position: INTEGER);

(* void gtk_grid_set_row_spacing(GtkGrid *grid, guint spacing) *)
PROCEDURE gtk_grid_set_row_spacing (grid: GtkGrid; spacing: CARDINAL);

(* void gtk_grid_set_column_spacing(GtkGrid *grid, guint spacing) *)
PROCEDURE gtk_grid_set_column_spacing (grid: GtkGrid; spacing: CARDINAL);

(* guint gtk_grid_get_row_spacing(GtkGrid *grid) *)
PROCEDURE gtk_grid_get_row_spacing (grid: GtkGrid) : CARDINAL;

(* guint gtk_grid_get_column_spacing(GtkGrid *grid) *)
PROCEDURE gtk_grid_get_column_spacing (grid: GtkGrid) : CARDINAL;

(* void gtk_grid_set_row_homogeneous(GtkGrid *grid, gboolean homogeneous) *)
PROCEDURE gtk_grid_set_row_homogeneous (grid: GtkGrid;
                                        homogeneous: INTEGER);

(* void gtk_grid_set_column_homogeneous(GtkGrid *grid, gboolean homogeneous) *)
PROCEDURE gtk_grid_set_column_homogeneous (grid: GtkGrid;
                                           homogeneous: INTEGER);

END GtkGrid.