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.