DIRECTORY AlpineEnvironment USING[AccessRights, Conversation, LockOption, OpenFileID, RecoveryOption, ReferencePattern], FileInstance USING[Handle]; OpenFileMapPrivate: CEDAR DEFINITIONS = BEGIN Handle: TYPE = REF OpenFileObject; OpenFileObject: TYPE = MONITORED RECORD[ openFileID: AlpineEnvironment.OpenFileID, conversation: AlpineEnvironment.Conversation, fileInsHandle: FileInstance.Handle, access: AlpineEnvironment.AccessRights, lockOption: AlpineEnvironment.LockOption, -- on GetLockOption the LockMode portion of this is ignored, and picked up instead from the FileInstanceObject. SetLockOption sets the LockMode in both this and the FileInstanceObject. recoveryOption: AlpineEnvironment.RecoveryOption, referencePattern: AlpineEnvironment.ReferencePattern, next: Handle]; END. Edit Log Initial: Kolling: October 28, 1982 11:41 am: private defs file for OpenFileMap. ξOpenFileMapPrivate.mesa Copyright c 1985 by Xerox Corporation. All rights reserved. Last edited by Kolling on November 12, 1982 4:37 pm Hauser, March 8, 1985 11:03:00 am PST Hauser, March 8, 1985 11:02:46 am PST Added copyright. Κ ˜šœ™Icodešœ Οmœ1™<—šœ™Jšœ$™$K™%J˜J˜—JšΟk ˜ ˜˜šžœD˜IJ˜——˜ Jšžœ ˜J˜J˜——Jšœžœž œ˜'J˜Jšž˜J˜J˜Jšœžœžœ˜"J˜šœžœž œžœ˜(J˜)J˜-J˜#J˜'Jšœ*ΟcΉ˜γJ˜1J˜5J˜J˜J˜J˜—Jšžœ˜˜J˜J˜—J˜OJ˜™%K™—K™—…—|v