<> <> <> <> <> <> <> <> DIRECTORY YggEnvironment USING[FileID, VolumeID], YggInternal USING[FileHandle, FPMFileHandle], YggLock USING [LockID], Rope USING[ROPE]; YggFileMap: CEDAR DEFINITIONS = BEGIN Handle: TYPE = YggInternal.FileHandle; Initialize: PROCEDURE[numHashSlotsDesired: NAT, fQLength: CARDINAL]; <> Register: PROCEDURE [volumeID: YggEnvironment.VolumeID, fileID: YggEnvironment.FileID] RETURNS [handle: Handle]; <> <> FileFromLockID: PROC [lock: YggLock.LockID] RETURNS [Handle]; <> <> GetVolumeID: PROCEDURE [handle: Handle] RETURNS [volumeID: YggEnvironment.VolumeID]; <> GetFileID: PROCEDURE [handle: Handle] RETURNS [fileID: YggEnvironment.FileID]; <> GetVolumeIDAndFileID: PROCEDURE [handle: Handle] RETURNS [volumeID: YggEnvironment.VolumeID, fileID: YggEnvironment.FileID]; <> GetName: PROC [file: Handle] RETURNS [Rope.ROPE]; <> <> SetInterlock: PROCEDURE [handle: Handle, new: BOOLEAN] RETURNS [old: BOOLEAN]; <> <> <> VerifyFilePageMgrHandle: PROCEDURE [handle: Handle, proc: PROCEDURE RETURNS [YggInternal.FPMFileHandle]] RETURNS [filePageMgrHandle: YggInternal.FPMFileHandle]; <> <> <> <> <> <> Enter: PROCEDURE [handle: Handle, proc: PROCEDURE]; <> <> <> GetNext: PROCEDURE [handle: Handle _ NIL] RETURNS [nextHandle: Handle]; <> <> SetName: PROC [file: Handle, name: Rope.ROPE]; <> <<>> SetRecoveryData: PROC [handle: Handle, ref: REF]; <> GetRecoveryData: PROC [handle: Handle] RETURNS [ref: REF]; END. CHANGE LOG Edited on February 14, 1985 11:36:15 am PST, by Kupfer <> <> <> <<>>