NodeStyleFont.mesa
Copyright © 1985 by Xerox Corporation. All rights reserved.
Michael Plass, May 22, 1985 9:14:20 am PDT
DIRECTORY
ImagerFont USING [Font],
NodeStyle USING [FontAlphabets, FontFace],
Rope USING [ROPE];
NodeStyleFont: CEDAR DEFINITIONS
~ BEGIN
Tioga Font Name Interpretation
FontNameFromStyleParams: PROC [prefix: ATOM, family: ATOM, face: NodeStyle.FontFace, size: REAL, alphabets: NodeStyle.FontAlphabets] RETURNS [name: Rope.ROPE, scale: REAL];
The prefix is used to determine how to build the rest of the name; no attempt is made to do any substitution.
FontFromStyleParams: PROC [prefix: ATOM, family: ATOM, face: NodeStyle.FontFace, size: REAL, alphabets: NodeStyle.FontAlphabets] RETURNS [ImagerFont.Font];
Does any necessary font substitution
END.