UFTfmReader.mesa
Copyright © 1983, 1984, Xerox Corporation. All rights reserved.
Access to Tioga font metric tables
Last changed by Michael Plass, February 15, 1984 8:48:37 am PST
Last changed by Doug Wyatt, August 6, 1984 11:43:37 am PDT
DIRECTORY
Rope USING [ROPE],
UFont USING [Key, LigatureOrKern],
UFTfm USING [ParamIndex, Word];
UFTfmReader: CEDAR DEFINITIONS =
BEGIN
Key: TYPE = UFont.Key;
ROPE: TYPE = Rope.ROPE;
CheckSum: PROCEDURE [key: Key] RETURNS [checkSum: UFTfm.Word];
CharacterCodingScheme: PROCEDURE [key: Key] RETURNS [characterCodingScheme: ROPE];
Family: PROCEDURE [key: Key] RETURNS [family: ROPE];
DesignSize:
PROCEDURE [key: Key]
RETURNS [designSize:
REAL];
In printer's points (72.27 per inch)
Face: PROCEDURE [key: Key] RETURNS [face: [0..256)];
Range: PROCEDURE [key: Key] RETURNS [bc, ec: CHAR];
Contains: PROCEDURE [key: Key, char: CHAR] RETURNS [BOOLEAN];
The dimensions returned below are relative.
Width: PROCEDURE [key: Key, char: CHAR] RETURNS [width: REAL];
Height: PROCEDURE [key: Key, char: CHAR] RETURNS [height: REAL];
Depth: PROCEDURE [key: Key, char: CHAR] RETURNS [depth: REAL];
ItalicCorrection: PROCEDURE [key: Key, char: CHAR] RETURNS [italicCorrection: REAL];
LigKern: PROCEDURE [key: Key, char1, char2: CHAR] RETURNS [ligOrKern: UFont.LigatureOrKern];
Slant: PROCEDURE [key: Key] RETURNS [numerator, denominator: INT];
Parameter: PROCEDURE [key: Key, index: UFTfm.ParamIndex] RETURNS [parameterValue: REAL];
END.