WalnutDBInternal.mesa
Copyright © 1984 by Xerox Corporation. All rights reserved.
Willie-Sue, April 30, 1985 3:55:40 pm PDT
Contents: types and procedures dealing with the Walnut message database
Initiated by Willie-Sue, September 24, 1984
Last Edited by: Willie-Sue, December 27, 1984 11:50:07 am PST
Last Edited by: Donahue, December 11, 1984 7:49:22 pm PST
(Added activeMessageSet and DeletedMessageSet to avoid recomputation)
DIRECTORY
DB USING [Entity, Relship],
RefTab USING [Ref],
Rope USING [ROPE];
WalnutDBInternal:
CEDAR
DEFINITIONS =
BEGIN
Types
ROPE: TYPE = Rope.ROPE;
Entity: TYPE = DB.Entity;
Relship: TYPE = DB.Relship;
Builtin Message Sets
activeMessageSet: READONLY DB.Entity;
deletedMessageSet: READONLY DB.Entity;
Useful variables
msgSetsTable: RefTab.Ref;
Procedures
ChangeCountInMsgSet: PROC[ms: Entity, inc: INT];
ChangeCountOfMsgs: PROC[delta: INT];
CarefullyApply: PROC[proc: PROC[]];
GetMsgDisplayInfo: PROC[m: Entity]
RETURNS[hasBeenRead: BOOL, tocEntry: ROPE, startOfSubject: INT];
END.