<> <> <> <<>> <> DIRECTORY IO USING [STREAM], Rope USING [ROPE]; WalnutMiscLog: CEDAR DEFINITIONS = BEGIN <> ROPE: TYPE = Rope.ROPE; STREAM: TYPE = IO.STREAM; TiogaControlItemType: INT = 525; --1015B walnutItemFixedLength: INT = 20; -- magic <> GetNewMailLog: PROC[lengthRequired: INT, pagesWanted: INT] RETURNS[strm: STREAM]; <> <<>> CloseNewMailLog: PROC; <> <<>> CreateReadArchiveLog: PROC[ fileToRead: STREAM, msgSet: ROPE, reportProc: PROC[msg1, msg2, msg3: ROPE_ NIL]] RETURNS[ok: BOOL, reason: ROPE]; <> <<>> CloseReadArchiveLog: PROC; <> ArchiveReader: PROC[archiveStream, fileToRead: STREAM, msgSet: ROPE, reportProc: PROC[msg1, msg2, msg3: ROPE_ NIL], posToStartInFileToRead: INT] RETURNS[ok: BOOL, lastCommitPosInFileToRead: INT]; <> MiscShutdown: PROC; <> END.