<<>> <> <> <> <> <<>> DIRECTORY Xl, XlGContextOps; XlGContextPrivate: CEDAR DEFINITIONS ~ BEGIN OPEN Xl, XlGContextOps; <<>> GContextRec: TYPE = RECORD [ <<--Cached copy of what should be on the server side before the context is actually used.>> <<--Clients should NOT call NEW directly since NEW does not set up server initial values.>> resourceID: ID ¬ 0, changed: GCValueMask ¬ ALL[FALSE], value: ARRAY ContextValueKey OF CARD32 ¬ ALL[0], --desired value serverKnown: GCValueMask ¬ ALL[FALSE],--whether server value is believed to be known server: ARRAY ContextValueKey OF CARD32 ¬ ALL[0], --believed server value owner: REF Connection ¬ NIL, --owner­ nilled out when connection dies drawable: Drawable ¬ nullDrawable, temporaryPreventGCFontLocal: REF ¬ NIL, temporaryPreventGCFontRemote: REF ¬ NIL ]; END.