-- CIFOutDevice.mesa -- Define CedarGraphics device for non-screen objects -- There will be only one instance of this device ever. -- Its only function is to direct CedarGraphics output (polygons) to -- the relevant CIF device -- Written by Martin Newell, October 1980 -- Last changed: October 20, 1980 2:57 PM DIRECTORY OpaqueDevice USING [DeviceContext], CIFDevicesDefs USING [DeviceDescriptor]; CIFOutDevice: DEFINITIONS = { MakeCIFOutDevice: PUBLIC PROCEDURE RETURNS[OpaqueDevice.DeviceContext]; SetCurrentDevice: PUBLIC PROCEDURE[device: CIFDevicesDefs.DeviceDescriptor]; }.(670)\404b12B