[Indigo]<Cedar>TSetter>TSTranslate.mesa!3

TSTranslate.mesa

Translates from Tioga tree representation to box & glue representation.

Michael Plass, November 17, 1982 12:02 pm

Last Edited by: Beach, May 24, 1983 9:14 am

DIRECTORY Rope, TSObject, TextNode, NodeStyle;

TSTranslate: DEFINITIONS =

BEGIN

ProgressProc: TYPE = PROC [progress: REAL]; -- reports on the progress of the translation phase, as a percentage

TreeToVlist: PUBLIC PROCEDURE [t: TextNode.Ref, progressProc: ProgressProc ← NIL] RETURNS [galley: TSObject.ItemList, style: NodeStyle.Ref];

Makes the tree into a vlist of lines, not broken into pages.

FontNotFound: SIGNAL [fontName: Rope.ROPE, location: INT] RETURNS [substitute: Rope.ROPE];

END.

Michael Plass, June 28, 1982 8:54 am. Renamed from TPTranslate.

Michael Plass, November 16, 1982 3:46 pm. Changed TreeToVlist to return style.

Michael Plass, November 17, 1982 12:01 pm. Added FontNotFound.