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
DIRECTORY
Space    USING [Handle],
ImagerBasic  USING [Transformation, Color, IntPair, PixelArray],
ImagerDisplay USING [Mask, DisplayProcs];
ImagerDisplayPrivate: CEDAR DEFINITIONS
= BEGIN
Context
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.