ImagerDeviceImpl.mesa
Last Edited by: Crow, May 28, 1983 7:31 pm
DIRECTORY
ImagerBasic   USING [Context, ImagingDevice, DeviceProcs],
Imager;
ImagerDeviceImpl: CEDAR PROGRAM
IMPORTS
EXPORTS Imager
= BEGIN OPEN ImagerBasic;
Client-called Procedures
RegisterDevice: PUBLIC PROC [name: ImagingDevice, procs: DeviceProcs] = {
-- Atom.PutProp[imagingDevice, deviceClassProp, NEW[DeviceClassRec ← [initializationProcedure, deviceParameters, procs]]];
};
EnumerateRegisteredDevices: PUBLIC PROC [] RETURNS [LIST OF ImagingDevice] = {
RETURN [ NIL ];
};
SetDevice: PUBLIC PROC [context: Context, device: ImagingDevice] = {};
This affects only the device transforms, clipping, etc.
GetDevice: PUBLIC PROC [context: Context] RETURNS [ImagingDevice] = {
RETURN [ context.device ];
};
Unpublicized Procedures
Internal Procedures
END.