DIRECTORY II USING [Context], IIFont USING [BYTE, Extents, Font, XChar], IITransformation USING [Transformation], IITypeface USING [Typeface]; IIFontPrivate: CEDAR DEFINITIONS ~ BEGIN OPEN IIFont; Transformation: TYPE ~ IITransformation.Transformation; Typeface: TYPE ~ IITypeface.Typeface; FontImpl: TYPE ~ REF FontImplRep; FontImplRep: TYPE ~ RECORD [ typeface: Typeface, fontBoundingBox: Extents _ [0, 0, 0, 0], escapementX: EscapementTable _ NIL, -- for character set 0 escapementY: EscapementTable _ NIL -- for character set 0 ]; EscapementTable: TYPE ~ REF EscapementTableRep; EscapementTableRep: TYPE ~ ARRAY BYTE OF REAL; FontAtom: TYPE ~ REF FontAtomRep; FontAtomRep: TYPE ~ RECORD [typeface: Typeface, m: Transformation]; MakeFontAtom: PROC [typeface: Typeface, m: Transformation] RETURNS [FontAtom]; MaskChar: PROC[font: Font, char: XChar, context: II.Context]; END. ²ImagerFontPrivate.mesa Copyright c 1985 by Xerox Corporation. All rights reserved. Doug Wyatt, May 22, 1985 5:11:59 pm PDT Michael Plass, August 19, 1986 5:08:38 pm PDT Κz˜codešœ™Kšœ Οmœ1™