OutputMessage.mesa
Last Edited by: McCreight, January 30, 1985 6:55:55 pm PST
DIRECTORY
IODefs, ParserErrorDefs, OutputDefs, Rope;
OutputMessage:
CEDAR
PROGRAM
IMPORTS IODefs
EXPORTS OutputDefs =
BEGIN
SendMessage:
PUBLIC
PROC [
type: ParserErrorDefs.ErrorType, message: Rope.
ROPE, wantCR:
BOOL ←
TRUE] =
BEGIN
IF wantCR
THEN IODefs.WriteLine[message]
ELSE IODefs.WriteString[message];
END;
END.