<> <> <<>> <> <> DIRECTORY ImagerBasic USING [Visibility, IntRectangle], ImagerPrivate USING [Context, ImagingSpace, ClipperRecord] ; ImagerClipper: CEDAR DEFINITIONS = BEGIN Context: TYPE = ImagerPrivate.Context; IntRectangle: TYPE = ImagerBasic.IntRectangle; ImagingSpace: TYPE = ImagerPrivate.ImagingSpace; ClipperRecord: TYPE = ImagerPrivate.ClipperRecord; Visibility: TYPE = ImagerBasic.Visibility; -- {visible, partlyVisible, invisible} SetClipper: PROC [context: Context, clipSpace: ImagingSpace, clipper: ClipperRecord]; GetClipper: PROC [context: Context, clipSpace: ImagingSpace, clipper: ClipperRecord]; END.