Constants and types
ROPE: TYPE = Rope.ROPE;
STREAM: TYPE = IO.STREAM;
MsgFromStreamProc: TYPE = PROC RETURNS[msgStream: STREAM, msgID: ROPE, unRead: BOOL, textLen, formatLen: INT];
MsgFromRopesProc: TYPE = PROC RETURNS[msgID, text, formatting: ROPE, unRead: BOOL];
relTocPointerEntryTemplate: READONLY ROPE;
relTocEntriesEntryTemplate: READONLY ROPE;
headerEntryTemplate: READONLY ROPE;
createMsgTemplate: READONLY ROPE;
Exported operations
CreateBCMailLogFromStream:
PROC[fileName:
ROPE, msgProc: MsgFromStreamProc]
RETURNS [ok: BOOL];
makes a BlackCherry mailLog using fileName; calls msgProc for the next message, which must be the next textLen+formatLen bytes - end of messages is signaled by msgStream = NIL;
CreateBCMailLogFromRopes:
PROC[fileName:
ROPE, msgProc: MsgFromRopesProc]
RETURNS [ok: BOOL];
makes a BlackCherry mailLog using fileName; calls msgProc for the next message - end of messages is signaled by text = NIL;
}.