DIRECTORY IO USING [STREAM], Rope USING [ROPE]; MT: CEDAR DEFINITIONS = BEGIN Direction: TYPE = {toArpa, toGrapevine}; Info: TYPE = REF InfoRec; InfoRec: TYPE; TranslateMessage: PROC [in, out, error: IO.STREAM, direction: Direction, id: Rope.ROPE]; 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.  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 Types Translate a message present on in to out printing error messages on error. ΚF– "cedar" style˜Ihead™code™&J™2J™.J™6code2šΟk ˜ Mšœœœ˜Mšœœœ˜——šœœ ˜Mš˜—šΟb™Mšœ œ˜(Mšœ˜Mšœ˜š Οnœœœœ!œ˜XMšœΟrœ œ œ™J—Mš Ÿ œœœœœ˜EMš Ÿ œœœœœœ˜DMšŸœœœœ˜5MšŸœœ˜#MšŸœœ˜(Mšœ˜——…—t