<> <> <> <> <<>> DIRECTORY ; GGSceneType: CEDAR DEFINITIONS = BEGIN SceneObj: TYPE = RECORD [ ptrValid: BOOL _ FALSE, -- TRUE when ptr accurately points to end of entities ptr: LIST OF REF ANY _ NIL, -- finger pointer to end of entities list entities: LIST OF REF ANY _ NIL, -- a list of slices and outlines oldEntities: LIST OF LIST OF REF ANY _ NIL, -- lists of slices and outlines. Used by Undelete. selected: SelectedData, savedSelected: SelectedData -- needed to recover from Abort operations ]; SelectedData: TYPE = RECORD [ normal: LIST OF REF ANY _ NIL, -- a list of selected SliceDescriptors hot: LIST OF REF ANY _ NIL, -- a list of hot SliceDescriptors active: LIST OF REF ANY _ NIL -- a list of active SliceDescriptors ]; END.