DIRECTORY GGModelTypes, GGInterfaceTypes, Imager; GGSceneType: CEDAR DEFINITIONS = BEGIN Slice: TYPE = GGModelTypes.Slice; FeatureCycler: TYPE = GGInterfaceTypes.FeatureCycler; SliceDescriptor: TYPE = GGModelTypes.SliceDescriptor; SceneObj: TYPE = RECORD [ ptrValid: BOOL _ FALSE, -- TRUE when ptr accurately points to end of entities ptr: LIST OF Slice _ NIL, -- finger pointer to end of entities list entities: LIST OF Slice _ NIL, -- a list of slices oldEntities: LIST OF LIST OF Slice _ NIL, -- lists of slices. Used by Undelete. selected: SelectedData, savedSelected: SelectedData, -- needed to recover from Abort operations prioritiesValid: BOOL, -- TRUE if no top level entities have been added or deleted since priorities were last updated, Bier, March 10, 1987 currentColor: Imager.Color, -- used by GGParseImpl to read sampled colors from Interpress lock: ATOM _ $NotLocked ]; SelectedData: TYPE = RECORD [ normal: LIST OF SliceDescriptor _ NIL, -- a list of selected SliceDescriptors normalPtr: LIST OF SliceDescriptor _ NIL, -- finger pointer to end of normal normalPtrValid: BOOL _ FALSE, -- TRUE when normalPtr accurately points to end of normal normalLast: SliceDescriptor _ NIL, -- the last parts that were normal selected hot: LIST OF SliceDescriptor _ NIL, -- a list of hot SliceDescriptors hotPtr: LIST OF SliceDescriptor _ NIL, -- finger pointer to end of hot hotPtrValid: BOOL _ FALSE, -- TRUE when hotPtr accurately points to end of normal active: LIST OF SliceDescriptor _ NIL, -- a list of active SliceDescriptors activePtr: LIST OF SliceDescriptor _ NIL, -- finger pointer to end of active activePtrValid: BOOL _ FALSE, -- TRUE when activePtr accurately points to end of normal match: LIST OF SliceDescriptor _ NIL, -- a list of match SliceDescriptors matchPtr: LIST OF SliceDescriptor _ NIL, -- finger pointer to end of match matchPtrValid: BOOL _ FALSE, -- TRUE when matchPtr accurately points to end of match, featureCycler: FeatureCycler ]; END. GGSceneType.mesa Copyright c 1986 by Xerox Corporation. All rights reserved. Last edited by Bier on December 28, 1986 1:39:00 pm PST Contents: The concrete Scene type (shared by GGScene and GGSelect). Pier, August 27, 1987 1:37:48 pm PDT Bier, June 20, 1989 10:45:08 pm PDT Κ^˜Icodešœ™Kšœ Οmœ1™