DIRECTORY Space USING [Handle], ImagerBasic USING [Transformation, Color, IntPair, PixelArray], ImagerDisplay USING [Mask, DisplayProcs]; ImagerDisplayPrivate: CEDAR DEFINITIONS = BEGIN ContextData: TYPE = REF ContextDataRep; -- Holds the imager state ContextDataRep: TYPE = RECORD [ currentColor: ImagerBasic.Color, currentPxlValue: LONG CARDINAL, currentPosition: ImagerBasic.IntPair, -- CP kept in device space -- ********* Transformations ************ clientTransform: ImagerBasic.Transformation, viewerTransform: ImagerBasic.Transformation, deviceTransform: ImagerBasic.Transformation, transform: ImagerBasic.Transformation, -- ***************** Clipping *********** clientClipper: ImagerDisplay.MaskRep, viewerClipper: ImagerDisplay.MaskRep, deviceClipper: ImagerDisplay.MaskRep, clipper: ImagerDisplay.MaskRep, -- composite clipper noClip: BOOLEAN _ FALSE, deviceType: ATOM, -- Current device type deviceProcs: ImagerDisplay.DisplayProcs, -- Device-dependent procedures wordsPerLine: CARDINAL, pxlBase: LONG POINTER, -- Access to image bits storage: Space.Handle, -- Handle for allocated storage for image bits data: REF ANY -- Interpretation of this depends on the procs ]; END. ΞImagerDisplayPrivate.mesa This interface provides the underlying data structures necessary to more than one definitions module within the Imager Last Edited by: Crow, August 4, 1983 4:23 pm Context Κ˜˜headšœ™J™vJ™šœ™Jšœ™—unitšΟk ˜ Jšœ œ ˜Jšœœ.˜BJšœœ˜)——šœœ ˜'Jšœ˜—head3šΟb™Lšœ œœΟc˜Ašœœœ˜Jšœ ˜ Jšœœœ˜Jšœ+Ÿ˜ELšŸ,˜,Jšœœ œ˜,Jšœœ˜,Jšœœ˜,Jšœ œ˜&—šŸ5˜5Jšœ%˜%Jšœ%˜%Jšœ%˜%JšœŸœŸ˜=Jšœœœ˜Lšœ œŸ˜,Iašœ-Ÿ ˜MJšœœ œœŸ˜GJšœŸ.˜KJšœœŸ7˜DJ˜——J˜Jšœ˜M˜—…—βH