DEFINITION MODULE DemoImpl ; (* m2-GTK4 - the demo implementations, in the gtk-demo style: each Do* procedure creates (once) a window, toggles its visibility, and returns it. Ported/simplified from gtk/demos/gtk-demo. *) FROM SYSTEM IMPORT ADDRESS; EXPORT UNQUALIFIED DoLinks, DoListBox, DoFlowBox, DoExpander, DoCss; PROCEDURE DoLinks (doWidget: ADDRESS) : ADDRESS; PROCEDURE DoListBox (doWidget: ADDRESS) : ADDRESS; PROCEDURE DoFlowBox (doWidget: ADDRESS) : ADDRESS; PROCEDURE DoExpander (doWidget: ADDRESS) : ADDRESS; PROCEDURE DoCss (doWidget: ADDRESS) : ADDRESS; END DemoImpl.