<> <> <> <> <<>> <> <<>> DIRECTORY CardTab, RefTab, SymTab, Xl, XlExtensions; XlPrivateTypes: CEDAR DEFINITIONS ~ BEGIN <<>> <> <<>> <> <<<>ConnectionPrivate: PUBLIC TYPE = XlPrivateTypes.ConnectionPrivateImplRec; >> ConnectionPrivateImplRec: TYPE = RECORD [ refRefSelf: REF Xl.Connection ¬ NIL, --"RefSelf" nilled out when connection dies nameToAtom: PRIVATE SymTab.Ref ¬ NIL, --for implementor InternAtom atomToName: PRIVATE CardTab.Ref ¬ NIL, --for implementor of InternAtom kMappings: PRIVATE REF KMappingCacheRep ¬ NIL, mMappings: PRIVATE REF MMappingCacheRep ¬ NIL, pMappings: PRIVATE REF PMappingCacheRep ¬ NIL, graphicsRef: PRIVATE REF GraphicsRep ¬ NIL, finalizationStuff: REF FinalizationRep ¬ NIL, pointerGrabber: PRIVATE REF GrabberRec ¬ NIL, serverGrabber: PRIVATE REF GrabberRec ¬ NIL, keyboardGrabbed: PRIVATE BOOL ¬ FALSE, keyboardGrabAtom: PRIVATE Xl.XAtom ¬ [0], extensionTab: PRIVATE RefTab.Ref ¬ NIL, extensionLock: PRIVATE BOOL ¬ FALSE, extensions: PRIVATE XlExtensions.ExtensionData, fontTable: PRIVATE REF FontPrivate ¬ NIL, debug: PRIVATE REF ¬ NIL ]; KMappingCacheRep: TYPE; PMappingCacheRep: TYPE; MMappingCacheRep: TYPE; GraphicsRep: TYPE; FontPrivate: TYPE; FinalizationRep: TYPE; GrabberRec: PRIVATE TYPE; END.