DIRECTORYVM USING[PageCount, PageNumber],YggEnvironment USING[PageNumber],YggDIDMap USING[Document];YggFilePageMgrPrivateChunk: CEDAR DEFINITIONS =BEGINRefChunk: TYPE = REF Chunk;Chunk: TYPE = RECORD[chunkType: ChunkType,defWritePending: BOOLEAN,state: ChunkState,useCount: NAT,doc: YggDIDMap.Document,startFilePageNumber: YggEnvironment.PageNumber,startVMPageNumber: VM.PageNumber,nVMPages: NAT,prev: RefChunk,next: RefChunk ];ChunkType: TYPE = {normal, log, treeHeader, lruHeader, ostGeneral};ClientChunkType: TYPE = ChunkType[normal..log];ListChunkType: TYPE = ChunkType[normal..log];ChunkState: TYPE = {undefined, valid, readInProgress, writeInProgress};ChunkVMPageCount: ARRAY ListChunkType OF VM.PageCount =[normal: 4, log: 4];ChunkFilePageCount: ARRAY ListChunkType OF VM.PageCount =[normal: 4, log: 4];ChunkAllocator: PROCEDURE [chunkType: ChunkType, permanent: BOOLEAN] RETURNS[refChunk: RefChunk];ChunkIsDirty: PROCEDURE[refChunk: RefChunk] RETURNS [dirty: BOOLEAN];Sweeper: PROCEDURE[chunkType: ChunkType];InternalFilePageMgrLogicError: ERROR;END.Edit LogInitial: Kolling: 22-Feb-82 16:18:32: a private defs file for the File Page Manager which sits between the rest of Alpine and Pilot.   :  YggFilePageMgrPrivateChunk.mesaCopyright c 1985, 1988 by Xerox Corporation.  All rights reserved.Last edited by:Kolling on January 31, 1984 2:13:05 pm PSTHauser, March 26, 1985 6:41:17 pm PSTBob Hagmann May 3, 1988 2:41:19 pm PDTThese should not be necessary.rbColor: BOOL,rbLLink, rbRLink: RefChunkbecause not every place is right yet.CompileTimeCheck1: [VM.wordsPerPage..VM.wordsPerPage] =YggEnvironment.wordsPerPage;because File promised an integral number of vm pages and page aligned(latter checked elsewhere).For information about the significance of the Chunk fields, see FilePageMgrPrivateFileObject.non system-fatal errors:  running out of vm is system fatal.non system-fatal errors:  none.non system-fatal errors:  none.misc.:Hauser, March 8, 1985 10:30:04 am PSTNodified, added copyright.ÊF  ˜ šœ™Icodešœ
Ïmœ7™B—šœ™Jšœ*™*K™%K™&J˜ J˜ J˜ —JšÏk	˜	˜ Jšœžœ˜ Jšœžœ˜!Jšœ
žœ˜J˜ —Jšœžœžœ˜/J˜ Jšž˜J˜ J˜ Jšœ
žœžœ˜J˜ šœžœžœ˜J˜Jšœžœ˜J˜Jšœ
žœ˜Jšœ˜Jšœ/˜/Jšœ!˜!Jšœ
žœ˜J˜J˜J™Jšœ	žœ™J™J˜J˜ —šœžœ4˜CJšœžœ˜/Jšœžœ˜-J˜ —Jšœžœ7˜GJ˜ šœžœžœ˜7J˜—šœžœžœ˜9Jšœ˜J˜ —Jšœ%™%šœ7™7Jšœ™—Jšœ`™`Jšœ]™]J˜ J˜ šÏnœž	œ#žœž˜LJ˜Jšœ<™<J˜ —šŸœž	œžœ	žœ˜EJšœ™J˜ —šŸœž	œ˜)Jšœ™J˜ J˜ —Jšœ™J˜ Jšœžœ˜%J˜ J˜ J˜ Jšžœ˜˜ J˜J˜ —J˜„J˜ J˜ ™%K™—K™ — …—    î  
n  