DIRECTORY Imager USING [Context, PathProc, Trajectory, XStringProc]; ImagerExtras: CEDAR DEFINITIONS ~ BEGIN OPEN Imager; ShowAndFixedXRel: PROC [context: Context, string: XStringProc, x: REAL]; NewStrokeJoint: TYPE ~ {miter, bevel, round}; NewSetStrokeJoint: PROC [context: Context, strokeJoint: NewStrokeJoint]; MaskDashedStroke: PROC [context: Context, path: PathProc, patternLen: NAT, pattern: PROC [NAT] RETURNS [REAL], offset, length: REAL]; MaskDashedStrokeTrajectory: PROC [context: Context, trajectory: Trajectory, patternLen: NAT, pattern: PROC [NAT] RETURNS [REAL], offset, length: REAL]; END. ΔImagerExtras.mesa Copyright c 1986 by Xerox Corporation. All rights reserved. Doug Wyatt, May 7, 1986 3:38:51 pm PDT Additions to the Imager interface. Text and Spacing Correction Does SetXRel[context, x] between characters. Masks and Clipping mitered: extend segment sides until they meet (acute angles make long, sharp corners) round: join segments in a circle of strokeWidth diameter Establishes the joint style for subsequent strokes. Κ;˜codešœ™Kšœ Οmœ1™