DEFINITION MODULE FOR "C" GtkAspectFrame ;

(*
   m2-GTK4 - GtkAspectFrame: constrains its child to an aspect ratio.
   Mapped onto <gtk/gtkaspectframe.h>.
*)

FROM SYSTEM IMPORT ADDRESS;

EXPORT UNQUALIFIED
   GtkAspectFrame,
   gtk_aspect_frame_new,
   gtk_aspect_frame_set_child,
   gtk_aspect_frame_set_obey_child,
   gtk_aspect_frame_set_ratio;


TYPE
   GtkAspectFrame = ADDRESS;

(* GtkWidget *gtk_aspect_frame_new(float xalign, float yalign,
                                    float ratio, gboolean obey_child) *)
PROCEDURE gtk_aspect_frame_new (xalign, yalign, ratio: SHORTREAL;
                                obey_child: INTEGER) : GtkAspectFrame;

(* void gtk_aspect_frame_set_child(GtkAspectFrame *self, GtkWidget *child) *)
PROCEDURE gtk_aspect_frame_set_child (self: GtkAspectFrame; child: ADDRESS);

(* void gtk_aspect_frame_set_obey_child(GtkAspectFrame *self, gboolean obey_child) *)
PROCEDURE gtk_aspect_frame_set_obey_child (self: GtkAspectFrame;
                                           obey_child: INTEGER);

(* void gtk_aspect_frame_set_ratio(GtkAspectFrame *self, float ratio) *)
PROCEDURE gtk_aspect_frame_set_ratio (self: GtkAspectFrame; ratio: SHORTREAL);

END GtkAspectFrame.