<> <> <> <> <> DIRECTORY AlpineInternal USING[FPMFileHandle, LogMapHandle], AlpineEnvironment USING[FileID, VolumeID], Rope USING[ROPE]; FileMapPrivate: CEDAR DEFINITIONS = BEGIN FileHandle: TYPE = REF FileObject; FileObject: TYPE = MONITORED RECORD[ volumeID: AlpineEnvironment.VolumeID, fileID: AlpineEnvironment.FileID, name: Rope.ROPE, -- human-legible name. fPMFileHandle: AlpineInternal.FPMFileHandle, logMapHandle: AlpineInternal.LogMapHandle, interlock: BOOLEAN, next: FileHandle]; END. <> <<>> <> <<>> <> <> <<>> <<>>