-- TARender.mesa
-- Rick Beach, July 5, 1982 12:04 pm
DIRECTORY
NodeStyle USING [OfStyle, Ref],
Rope USING [ROPE],
TextNode USING [Ref],
TSOutput USING [Handle];
TARender: DEFINITIONS = {
ROPE: TYPE = Rope.ROPE;
NotATiogaArtworkDocument: SIGNAL[fileName: ROPE];
NotATiogaArtworkNode: SIGNAL;
DocumentNotFound: SIGNAL[fileName: ROPE];
RenderDocument: PROCEDURE [handle: TSOutput.Handle, fileName: ROPE, paint: BOOLEAN ← TRUE];
-- render the artwork contained in the Tioga Artwork document
RenderBranch: PROCEDURE [handle: TSOutput.Handle, node: TextNode.Ref, nodeStyle: NodeStyle.Ref, kind: NodeStyle.OfStyle, paint: BOOLEAN ← TRUE];
-- render the artwork contained in the Tioga subtree spawned by this node
RenderNode: PROCEDURE [handle: TSOutput.Handle, node: TextNode.Ref, nodeStyle: NodeStyle.Ref, kind: NodeStyle.OfStyle, paint: BOOLEAN ← TRUE];
-- render the artwork contained in only this node
}.