<<-- File: NuthatchLog.mesa -- the routines that access the user's nuthatch log. -- Last Edited by: Lia, September 30, 1983 11:47 am >> <> DIRECTORY Nuthatch USING [NuthatchUserHandle], Rope USING [ROPE]; NuthatchLog: CEDAR DEFINITIONS = { Handle: TYPE = Nuthatch.NuthatchUserHandle; InitializeLog: PROC [handle: Handle]; <> WriteLogEntry: PROC [logRope: Rope.ROPE, handle: Handle]; <> <> SetLogIndex: PROC [handle: Handle]; <> ReadLogEntry: PROC[handle:Handle] RETURNS[logEntryRope: Rope.ROPE, endOfLog: BOOL]; <> UpdateLogIndex: PROC[handle:Handle]; <> <> <<>> Error: ERROR[code: ErrorCode]; ErrorCode: TYPE = { aborted, failed }; }.