NodeStyleFont.mesa
Copyright © 1985, 1986 by Xerox Corporation. All rights reserved.
Michael Plass, May 22, 1985 9:14:20 am PDT
Doug Wyatt, September 2, 1986 1:08:34 pm 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.