UNSAFE INTERFACEas much as possible of X server extension calls which affect core modules, such as XClient, should be hidden behind this interface to isolate the extension code.XExtensions ; IMPORT TrestleComm, XClient, XScreenType; <* PRAGMA LL *>
these procedures are called at the end of the initialisation of the relevant objects
PROCEDURE InitXClient (xclient: XClient.T) RAISES {TrestleComm.Failure}; <* LL = trsl *> PROCEDURE InitXScreenType (st: XScreenType.T) RAISES {TrestleComm.Failure}; <* LL = {trsl} *> END XExtensions.