-- ColorPackagePrivate.mesa
-- last edited by Maureen Stone, October 5, 1982 2:20 pm
-- last edited by Doug Wyatt, August 31, 1982 2:24 pm
-- makes life easier for debugging the color device
DIRECTORY
GraphicsBasic USING [DeviceRef],
ColorDisplay USING [Byte];
ColorPackagePrivate: CEDAR DEFINITIONS = {
Byte: TYPE = ColorDisplay.Byte;
DeviceProc: TYPE = PROCEDURE[raster,height: CARDINAL ← 0]
RETURNS[GraphicsBasic.DeviceRef];
ColorMapProc: TYPE = PROC[r,g,b: Byte] RETURNS[Byte];
SetNewContextProc: PROC[new: DeviceProc];
--this lets me slide in a new ColorDevice without rebuilding the boot file
SetNewColorMapProc: PROC[new: ColorMapProc];
--this lets me slide in a new colormap lookup proc without rebuilding the boot file
}.