DIRECTORY UnifiedFonts USING [Key] ; ImagerFontCache: CEDAR DEFINITIONS ~ BEGIN FontCache: TYPE ~ REF FontCacheRep; FontCacheRep: TYPE; FontCode: TYPE ~ RECORD [key: CARDINAL]; FontFileCode: TYPE ~ UnifiedFonts.Key; Create: PROC RETURNS [FontCache]; GetFontCode: PROC [r0, r1, r2, r3, r4, r5: REAL, fontFileCode: FontFileCode] RETURNS [FontCode]; InterpretFontCode: PROC [fontCode: FontCode] RETURNS [r0, r1, r2, r3, r4, r5: REAL, fontFileCode: FontFileCode]; InvalidFontCode: ERROR; Flush: PROC [fontFileCode: FontFileCode]; GetCharData: PROC [fontCache: FontCache, fontCode: FontCode, char: CHAR] RETURNS [REF]; CacheMiss: SIGNAL; LoadCharData: PROC [fontCache: FontCache, fontCode: FontCode, char: CHAR, data: REF]; END. ImagerFontCache.mesa Michael Plass, June 21, 1983 8:58 am Makes a new font cache. Makes a new font code. FontCodes are unique across all FontCaches. The real numbers may be used to represent a transformation, and fontFileCode identifies the soruce of the untransformed font. May raise: Invalidates all FontCodes that refer to the given fontFileCode. For getting the REF data associated with a given character in a given font. If the REF is not present, will raise the following signal: For preloading the cache. ΚM˜J™J™$unitšΟk ˜ Jšœ œ˜J˜—Kšœœ˜*Jšœ œœ˜#Jšœœ˜Jšœ œœ œ˜(Jšœœ˜&šΟnœœœ ˜!J™—šž œœœœ ˜`JšœΑ™Α—šžœœœœ˜pJšœ ™ Jšžœœ˜—šžœœ˜)Jšœ?™?—š ž œœ2œœœ˜WJšœœAœ1™ˆJšž œœ˜—šž œœ2œœ˜UJ™—Kšœ˜—…—Φ+