DIRECTORY Atom USING [PropList], II USING [Color, ColorOperator, Context, Font, Object, PathProc, PixelArray, PixelMap, Rectangle, SampleMap, ScanMode, Transformation, VEC, XStringProc], IIBackdoor USING [Clipper, CoordSys, IntKey, RealKey, Visibility], SF USING [Vec]; IIPrivate: CEDAR DEFINITIONS ~ BEGIN OPEN IIBackdoor, II; Class: TYPE ~ REF ClassRep; ClassRep: TYPE ~ RECORD [ type: ATOM _, DoSave: PROC [context: Context, action: PROC, all: BOOL] _, SetInt: PROC [context: Context, key: IntKey, val: INT] _, SetReal: PROC [context: Context, key: RealKey, val: REAL] _, SetT: PROC [context: Context, m: Transformation] _, SetFont: PROC [context: Context, font: Font] _, SetColor: PROC [context: Context, color: Color] _, SetClipper: PROC [context: Context, clipper: Clipper] _, GetInt: PROC [context: Context, key: IntKey] RETURNS [INT] _, GetReal: PROC [context: Context, key: RealKey] RETURNS [REAL] _, GetT: PROC [context: Context] RETURNS [Transformation] _, GetFont: PROC [context: Context] RETURNS [Font] _, GetColor: PROC [context: Context] RETURNS [Color] _, GetClipper: PROC [context: Context] RETURNS [Clipper] _, ConcatT: PROC [context: Context, m: Transformation] _, Scale2T: PROC [context: Context, s: VEC] _, RotateT: PROC [context: Context, a: REAL] _, TranslateT: PROC [context: Context, t: VEC] _, Move: PROC [context: Context, rounded: BOOL] _, SetXY: PROC [context: Context, p: VEC] _, SetXYRel: PROC [context: Context, v: VEC] _, GetCP: PROC [context: Context, rounded: BOOL] RETURNS [VEC] _, StartUnderline: PROC [context: Context] _, MaskUnderline: PROC [context: Context, dy, h: REAL] _, CorrectMask: PROC [context: Context] _, CorrectSpace: PROC [context: Context, v: VEC] _, Space: PROC [context: Context, x: REAL] _, SetCorrectMeasure: PROC [context: Context, v: VEC] _, SetCorrectTolerance: PROC [context: Context, v: VEC] _, Correct: PROC [context: Context, action: PROC] _, DontCorrect: PROC [context: Context, action: PROC, saveCP: BOOL] _, SetGray: PROC [context: Context, f: REAL] _, SetSampledColor: PROC [context: Context, pa: PixelArray, m: Transformation, colorOperator: ColorOperator] _, SetSampledBlack: PROC [context: Context, pa: PixelArray, m: Transformation, clear: BOOL] _, Clip: PROC [context: Context, path: PathProc, oddWrap: BOOL, exclude: BOOL] _, ClipRectangle: PROC [context: Context, r: Rectangle, exclude: BOOL] _, ClipRectangleI: PROC [context: Context, x, y, w, h: INTEGER, exclude: BOOL] _, Show: PROC [context: Context, string: XStringProc, xrel: BOOL] _, MaskFill: PROC [context: Context, path: PathProc, oddWrap: BOOL] _, MaskRectangle: PROC [context: Context, r: Rectangle] _, MaskStroke: PROC [context: Context, path: PathProc, closed: BOOL] _, MaskPixel: PROC [context: Context, pa: PixelArray] _, ShowAndFixedXRel: PROC [context: Context, string: XStringProc, x: REAL] _, ShowText: PROC [context: Context, text: REF READONLY TEXT, start, len: NAT, xrel: BOOL] _, MaskRectangleI: PROC [context: Context, x, y, w, h: INTEGER] _, MaskVector: PROC [context: Context, p1, p2: VEC] _, MaskDashedStroke: PROC [context: Context, path: PathProc, patternLen: NAT, pattern: PROC [NAT] RETURNS [REAL], offset, length: REAL] _, MaskBitmap: PROC [context: Context, bitmap: SampleMap, referencePoint: SF.Vec, scanMode: ScanMode, position: VEC] _, DrawBitmap: PROC [context: Context, bitmap: SampleMap, referencePoint: SF.Vec, scanMode: ScanMode, position: VEC] _, DrawPixels: PROC [context: Context, pixelMap: PixelMap, colorOperator: ColorOperator, referencePoint: SF.Vec, scanMode: ScanMode, position: VEC] _, DoIfVisible: PROC [context: Context, r: Rectangle, action: PROC] _, DoWithBuffer: PROC [context: Context, action: PROC, x, y, w, h: INTEGER, backgroundColor: Color] _, DrawObject: PROC [context: Context, object: Object, position: VEC, interactive: BOOL] _, GetBounds: PROC [context: Context] RETURNS [Rectangle] _, ViewReset: PROC [context: Context] _, ViewTranslateI: PROC [context: Context, x, y: INTEGER] _, ViewClip: PROC [context: Context, path: PathProc, oddWrap: BOOL, exclude: BOOL] _, ViewClipRectangleI: PROC [context: Context, x, y, w, h: INTEGER, exclude: BOOL] _, GetTransformation: PROC [context: Context, from, to: CoordSys] RETURNS [Transformation] _, Transform: PROC [context: Context, v: VEC, from, to: CoordSys, vec: BOOL] RETURNS [VEC] _, MoveViewRectangle: PROC [context: Context, width, height, fromX, fromY, toX, toY: INTEGER] _, TestViewRectangle: PROC [context: Context, x, y, w, h: INTEGER] RETURNS [Visibility] _, propList: Atom.PropList _ NIL ]; DefaultShowAndFixedXRel: PROC [context: Context, string: XStringProc, x: REAL]; DefaultShowText: PROC [context: Context, text: REF READONLY TEXT, start, len: NAT, xrel: BOOL]; DefaultMaskRectangleI: PROC [context: Context, x, y, w, h: INTEGER]; DefaultMaskVector: PROC [context: Context, p1, p2: VEC]; DefaultMaskDashedStroke: PROC [context: Context, path: PathProc, patternLen: NAT, pattern: PROC [NAT] RETURNS [REAL], offset, length: REAL]; DefaultMaskBitmap: PROC [context: Context, bitmap: SampleMap, referencePoint: SF.Vec, scanMode: ScanMode, position: VEC]; DefaultDrawBitmap: PROC [context: Context, bitmap: SampleMap, referencePoint: SF.Vec, scanMode: ScanMode, position: VEC]; DefaultDrawPixels: PROC [context: Context, pixelMap: PixelMap, colorOperator: ColorOperator, referencePoint: SF.Vec, scanMode: ScanMode, position: VEC]; DefaultDoWithBuffer: PROC [context: Context, action: PROC, x, y, w, h: INTEGER, backgroundColor: Color]; DefaultDrawObject: PROC [context: Context, object: Object, position: VEC, interactive: BOOL]; RasterDrawObject: PROC [context: Context, object: Object, position: VEC, interactive: BOOL]; DefaultDoIfVisible: PROC [context: Context, r: Rectangle, action: PROC]; DefaultGetBounds: PROC [context: Context] RETURNS [Rectangle]; DefaultViewReset: PROC [context: Context]; DefaultViewTranslateI: PROC [context: Context, x, y: INTEGER]; DefaultViewClip: PROC [context: Context, path: PathProc, oddWrap: BOOL, exclude: BOOL]; DefaultViewClipRectangleI: PROC [context: Context, x, y, w, h: INTEGER, exclude: BOOL]; DefaultTransform: PROC [context: Context, v: VEC, from, to: CoordSys, vec: BOOL] RETURNS [VEC]; DefaultGetTransformation: PROC [context: Context, from, to: CoordSys] RETURNS [Transformation]; DefaultMoveViewRectangle: PROC [context: Context, width, height, fromX, fromY, toX, toY: INTEGER]; DefaultTestViewRectangle: PROC [context: Context, x, y, w, h: INTEGER] RETURNS [Visibility]; END. †ImagerPrivate.mesa Copyright Σ 1985, 1986 by Xerox Corporation. All rights reserved. Michael Plass, December 10, 1986 12:03:57 pm PST Doug Wyatt, November 11, 1985 4:58:47 pm PST Class operations for maintaining the imager state; see IIState for default implementations. Essential class operations; must be supplied by the particular implementation. Convenience operations; default implementations express these in terms of the essential ones. View operations; default implementations default benignly or raise an appropriate error. Default implementations for the convenience operators. Default implementations for the view operations. Κ˜codešœ™KšœB™BK™0Kšœ,™,K™—šΟk ˜ Kšœœ ˜Kšœœœ˜™Kšœ œ2˜BKšœœ˜—K˜KšΠbl œœ ˜Kšœœœ˜K™Kšœœœ ˜šœ œœ˜Kšœœ˜ —™[KšΟnœœœœ˜;KšŸœœ&œ˜9KšŸœœ'œ˜KšŸœœ˜*KšŸ œœœ˜6KšŸ œœ˜'KšŸ œœœ˜0KšŸœœœ˜*KšŸœœœ˜5KšŸœœœ˜7KšŸœœœ˜1KšŸ œœœ œ˜CKšŸœœœ˜,KšŸœœX˜mKšŸœœ?œ˜\KšŸœœ-œ œ˜NKšŸ œœ+œ˜FKšŸœœ œ œ˜N—™NKšŸœœ/œ˜AKšŸœœ-œ˜CKšŸ œœ$˜7KšŸ œœ,œ˜DKšŸ œœ&˜5—™]KšŸœœ,œ˜JKšŸœœœœœœœ˜ZKšŸœœ œ˜?KšŸ œœœ˜3KšŸœœ1œ œœœœœ˜ˆKšŸ œœ7œ$œ˜tKšŸ œœ7œ$œ˜tKšŸ œœVœ$œ˜“KšŸ œœ*œ˜CKšŸ œœœœ˜cKšŸ œœ.œœ˜X—™XKšŸ œœœ˜9KšŸ œœ˜%KšŸœœœ˜9KšŸœœ-œ œ˜RKšŸœœ œ œ˜RKšŸœœ(œ˜ZKš Ÿ œœœœœœ˜ZKšŸœœœ'œ˜]KšŸœœ œœ˜W—˜Kšœ˜K˜K˜—head™6KšŸœœ,œ˜OKšŸœœœœœœœ˜_KšŸœœ œ˜DKšŸœœœ˜8KšŸœœ0œ œœœœœ˜ŒKšŸœœ7œ$œ˜yKšŸœœ7œ$œ˜yKšŸœœVœ$œ˜˜KšŸœœœœ˜hKšŸœœ.œœ˜]KšŸœœ.œœ˜\—™0KšŸœœ*œ˜HKšŸœœœ ˜>KšŸœœ˜*KšŸœœœ˜>KšŸœœ-œ œ˜WKšŸœœ œ œ˜WKš Ÿœœœœœœ˜_KšŸœœ(œ˜_KšŸœœœ'œ˜bšŸœœ œœ˜\K˜——Kšœ˜—…—V"ς