ImagerFontFilter.mesa
Copyright © 1985 by Xerox Corporation. All rights reserved.
Michael Plass, June 22, 1985 9:35:06 pm PDT
DIRECTORY
Commander USING [Handle],
Imager USING [Context],
Rope USING [ROPE];
ImagerFontFilter: CEDAR DEFINITIONS
~ BEGIN
ROPE: TYPE ~ Rope.ROPE;
FontMap: TYPE ~ LIST OF FontMapEntry;
FontMapEntry: TYPE ~ RECORD [
inputName: ROPE,
output: OutputMap,
warn: BOOL ← FALSE
];
OutputMap: TYPE ~ LIST OF OutputMapEntry;
OutputMapEntry: TYPE ~ RECORD [newName: ROPE, charMap: CharacterCodeMap];
CharacterCodeMap: TYPE ~ LIST OF CharRangeMap;
CharRangeMap: TYPE ~ RECORD [bc, ec: WORD, newbc: WORD];
FilterFonts: PROC [c: Imager.Context, fontMap: FontMap, cmd: Commander.Handle, verbose: BOOL] RETURNS [context: Imager.Context];
END.