DEFINITION MODULE GtkDemo ;

(*
   m2-GTK4 - the demo registry, mirroring the gtk-demo model: a list of
   demos, each with a title, search keywords and a build function of the
   form

      BuildProc = PROCEDURE (ADDRESS) : ADDRESS;

   which creates (once), toggles and returns the demo's window.
*)

FROM SYSTEM IMPORT ADDRESS;

EXPORT UNQUALIFIED BuildProc,
   Count, TitleOf, KeywordsOf, BuildByTitle;

TYPE
   BuildProc = PROCEDURE (ADDRESS) : ADDRESS;

PROCEDURE Count () : CARDINAL;
PROCEDURE TitleOf (i: CARDINAL; VAR title: ARRAY OF CHAR);
PROCEDURE KeywordsOf (i: CARDINAL; VAR keywords: ARRAY OF CHAR);
PROCEDURE BuildByTitle (title: ARRAY OF CHAR; doWidget: ADDRESS) : ADDRESS;

END GtkDemo.