JaMTS.mesa
Copyright © 1985 by Xerox Corporation. All rights reserved.
Maureen Stone, January 31, 1984 2:58:55 pm PST
Doug Wyatt, March 18, 1985 3:38:48 pm PST
Interface to JaMTSImpl used by JaMImager and JaMGraphics.
DIRECTORY
JaM USING [State],
ReadEvalPrint USING [Handle],
Rope USING [ROPE];
JaMTS: CEDAR DEFINITIONS
= BEGIN
ROPE: TYPE ~ Rope.ROPE;
JaMData: TYPE = REF JaMDataRec;
JaMDataRec: TYPE = RECORD[state: JaM.State, input: ROPE];
CreateJaMTS: PROC [name: ROPE, commandLine: ROPE, searchRules: LIST OF REF ANY]
RETURNS
[ReadEvalPrint.Handle];
GetLastHandle: PROC RETURNS[ReadEvalPrint.Handle];
data: JaMData ← NARROW[GetLastHandle[].clientData];
END.