-- DummyFileMapPrivate.mesa      Last edit: KK     October 26, 1982 12:26 pm


DIRECTORY

     AlpineInternal
	    USING[FPMFileHandle, LogMapHandle],
	  AlpineEnvironment
	    USING[FileID, VolumeID];


DummyFileMapPrivate: DEFINITIONS =

BEGIN


FileObject: TYPE = MONITORED RECORD[fileID: AlpineEnvironment.FileID, volID:
 AlpineEnvironment.VolumeID, fPMFileHandle: AlpineInternal.FPMFileHandle, logMapHandle:
 AlpineInternal.LogMapHandle, useCount: CARDINAL, enumNum: CARDINAL];
 
FileHandle: TYPE = REF FileObject;



MonitoredRegisterHandle: PROCEDURE[handle: FileHandle];

MonitoredUnregisterHandle: PROCEDURE[handle: FileHandle, ReleaseProc:
 PROCEDURE[handle: FileHandle]];

HorribleError: ERROR;

END.

					Edit Log

Initial: Kolling: 13-Apr-82 12:43:56: private defs file for FileMap.