<<>> <> <> <> DIRECTORY IO USING [STREAM], Rope USING [ROPE], VM USING [Interval]; MimSysOpsPrivate: CEDAR DEFINITIONS = BEGIN <> MappedFile: TYPE = REF MappedFileRecord; MappedFileRecord: TYPE = RECORD [ mfi: MappedFileInner ]; MappedFileInner: TYPE = REF MappedFileInnerRecord; MappedFileInnerRecord: TYPE = RECORD [ name: Rope.ROPE, interval: VM.Interval, count: INT, stream: IO.STREAM, base: LONG POINTER, bytes: INT ]; END.