m2-GTK4/src/GtkAssistant.def

DEFINITION MODULE FOR "C" GtkAssistant ;

(*
   m2-GTK4 - GtkAssistant: a multi-page wizard.  Mapped onto
   <gtk/deprecated/gtkassistant.h> (deprecated).

   Add pages with append_page/insert_page; each returns the page index.
   Per-page title/type/complete state are set with the set_page_* calls.
*)

FROM SYSTEM IMPORT ADDRESS;

EXPORT UNQUALIFIED
   GtkAssistant, GtkAssistantPageType,
   AssistantPageContent, AssistantPageIntro, AssistantPageConfirm,
   AssistantPageSummary, AssistantPageProgress, AssistantPageCustom,
   gtk_assistant_new,
   gtk_assistant_append_page, gtk_assistant_prepend_page,
   gtk_assistant_insert_page, gtk_assistant_remove_page,
   gtk_assistant_add_action_widget,
   gtk_assistant_set_current_page, gtk_assistant_get_current_page,
   gtk_assistant_get_n_pages, gtk_assistant_get_nth_page,
   gtk_assistant_set_page_title, gtk_assistant_set_page_complete,
   gtk_assistant_set_page_type,
   gtk_assistant_commit, gtk_assistant_next_page, gtk_assistant_previous_page;


TYPE
   GtkAssistant = ADDRESS;
   GtkAssistantPageType = CARDINAL;

CONST
   AssistantPageContent  = 0;
   AssistantPageIntro    = 1;
   AssistantPageConfirm  = 2;
   AssistantPageSummary  = 3;
   AssistantPageProgress = 4;
   AssistantPageCustom   = 5;

(* GtkWidget *gtk_assistant_new(void) *)
PROCEDURE gtk_assistant_new () : GtkAssistant;

(* int gtk_assistant_append_page(GtkAssistant *assistant, GtkWidget *page) *)
PROCEDURE gtk_assistant_append_page (assistant: GtkAssistant; page: ADDRESS) : [ INTEGER ];

(* int gtk_assistant_prepend_page(GtkAssistant *assistant, GtkWidget *page) *)
PROCEDURE gtk_assistant_prepend_page (assistant: GtkAssistant; page: ADDRESS) : [ INTEGER ];

(* int gtk_assistant_insert_page(GtkAssistant *assistant, GtkWidget *page, int position) *)
PROCEDURE gtk_assistant_insert_page (assistant: GtkAssistant; page: ADDRESS;
                                     position: INTEGER) : [ INTEGER ];

(* void gtk_assistant_remove_page(GtkAssistant *assistant, int page_num) *)
PROCEDURE gtk_assistant_remove_page (assistant: GtkAssistant; page_num: INTEGER);

(* void gtk_assistant_add_action_widget(GtkAssistant *assistant, GtkWidget *child) *)
PROCEDURE gtk_assistant_add_action_widget (assistant: GtkAssistant; child: ADDRESS);

(* void gtk_assistant_set_current_page(GtkAssistant *assistant, int page_num) *)
PROCEDURE gtk_assistant_set_current_page (assistant: GtkAssistant; page_num: INTEGER);

(* int gtk_assistant_get_current_page(GtkAssistant *assistant) *)
PROCEDURE gtk_assistant_get_current_page (assistant: GtkAssistant) : INTEGER;

(* int gtk_assistant_get_n_pages(GtkAssistant *assistant) *)
PROCEDURE gtk_assistant_get_n_pages (assistant: GtkAssistant) : INTEGER;

(* GtkWidget *gtk_assistant_get_nth_page(GtkAssistant *assistant, int page_num) *)
PROCEDURE gtk_assistant_get_nth_page (assistant: GtkAssistant;
                                      page_num: INTEGER) : ADDRESS;

(* void gtk_assistant_set_page_title(GtkAssistant *assistant, GtkWidget *page,
                                      const char *title) *)
PROCEDURE gtk_assistant_set_page_title (assistant: GtkAssistant; page: ADDRESS;
                                        title: ARRAY OF CHAR);

(* void gtk_assistant_set_page_complete(GtkAssistant *assistant, GtkWidget *page,
                                         gboolean complete) *)
PROCEDURE gtk_assistant_set_page_complete (assistant: GtkAssistant;
                                           page: ADDRESS; complete: INTEGER);

(* void gtk_assistant_set_page_type(GtkAssistant *assistant, GtkWidget *page,
                                     GtkAssistantPageType type) *)
PROCEDURE gtk_assistant_set_page_type (assistant: GtkAssistant; page: ADDRESS;
                                       type: GtkAssistantPageType);

(* void gtk_assistant_commit(GtkAssistant *assistant) *)
PROCEDURE gtk_assistant_commit (assistant: GtkAssistant);

(* void gtk_assistant_next_page(GtkAssistant *assistant) *)
PROCEDURE gtk_assistant_next_page (assistant: GtkAssistant);

(* void gtk_assistant_previous_page(GtkAssistant *assistant) *)
PROCEDURE gtk_assistant_previous_page (assistant: GtkAssistant);

END GtkAssistant.