MT.mesa
Hal Murray May 27, 1985 7:48:36 pm PDT
Last Edited by: HGM, April 20, 1985 9:26:34 pm PST
Last Edited by: Nichols, July 18, 1983 3:09 pm
Last Edited by: Taft, February 5, 1984 11:34:55 am PST
DIRECTORY
IO USING [STREAM],
Rope USING [ROPE];
MT: CEDAR DEFINITIONS =
BEGIN
Types
Direction: TYPE = {toArpa, toGrapevine};
Info: TYPE = REF InfoRec;
InfoRec: TYPE;
TranslateMessage: PROC [in, out, error: IO.STREAM, direction: Direction, id: Rope.ROPE];
Translate a message present on in to out printing error messages on error.
ParseHeaders: PROC [file, errStream: IO.STREAM] RETURNS [info: Info];
PrintHeaders: PROC [info: Info, out: IO.STREAM, fold: BOOL ← FALSE];
CheckFromField: PROC [info: Info] RETURNS [ok: BOOL];
TranslateToArpa: PROC [info: Info];
TranslateToGrapevine: PROC [info: Info];
END.