m2-GTK4/demos/GtkDemo.def

DEFINITION MODULE GtkDemo ;

(*
   m2-GTK4 - the registry of *ported* gtk-demo demos: maps a demo name
   (as used by tools/extract_demos.py and the C sources, e.g.
   "aspect_frame") to its build procedure.  The full catalogue of demos
   lives in DemoCatalog; this registry only knows which ones are
   implemented.

   BuildByName() returns NIL when a demo has not been ported yet.
*)

FROM SYSTEM IMPORT ADDRESS;

EXPORT UNQUALIFIED BuildProc, Count, NameOf, BuildByName, IsPorted;

TYPE
   BuildProc = PROCEDURE (ADDRESS) : ADDRESS;

PROCEDURE Count () : CARDINAL;
PROCEDURE NameOf (i: CARDINAL; VAR name: ARRAY OF CHAR);
PROCEDURE BuildByName (name: ARRAY OF CHAR; doWidget: ADDRESS) : ADDRESS;
PROCEDURE IsPorted (name: ARRAY OF CHAR) : BOOLEAN;

END GtkDemo.