TSViewer.mesa
Michael Plass, November 15, 1982 2:50 pm
DIRECTORY
Rope, PressScreen;
TSViewer: DEFINITIONS =
BEGIN
ROPE: TYPE = Rope.ROPE;
Tool: TYPE = REF ToolRec;
ToolRec: TYPE;
NewTool:
PROCEDURE [server:
ROPE]
RETURNS [Tool];
creates a new viewer
QueueRequest:
PROCEDURE [tool: Tool, documentName:
ROPE];
Adds the named document to the tool's queue
WaitForIdle:
PROCEDURE [tool: Tool];
Waits until the typesetter stops running
Stop:
PROCEDURE [tool: Tool];
Like clicking the Stop button
Pause:
PROCEDURE [tool: Tool];
Like clicking the Pause button
StopSending:
PROCEDURE [tool: Tool];
Like clicking the StopSending button
Print:
PROCEDURE [tool: Tool];
Like clicking the Print button
PrintAll:
PROCEDURE [tool: Tool];
Typesets the whole queue, producing a single output file
Screen:
PROCEDURE [tool: Tool, side: PressScreen.Side];
Like clicking one of < Screen > ; side is leftSide, bothSides, or rightSide.
Copies:
PROCEDURE [tool: Tool, copies:
NAT];
Sets the 'Copies' parameter
TempPress:
PROCEDURE [tool: Tool, temporaryPressFiles:
BOOLEAN ←
TRUE];
Sets the 'Temporary Press Files' parameter
END.
Michael Plass, November 15, 1982 2:49 pm. Added StopSending and Screen.