-- VMMgr>MapLog.mesa (last edited by: Gobbel on: January 13, 1981  11:58 AM)

DIRECTORY
  CachedSpace: FROM "CachedSpace" USING [Desc],
  VM: FROM "VM" USING [Interval];

MapLog: DEFINITIONS =
BEGIN

WriteLog: PROCEDURE
  [interval: VM.Interval, pSpaceD: POINTER TO CachedSpace.Desc] =
  INLINE {IF mapLogging THEN WriteLog1[interval, pSpaceD]};
-- Write one or more log entries; pDesc=NIL => interval is now unmapped

mapLogging: PRIVATE READONLY BOOLEAN;

WriteLog1: PRIVATE PROCEDURE
  [interval: VM.Interval, pSpaceD: POINTER TO CachedSpace.Desc];

END.

LOG
Time: July 31, 1978  9:36 AM	By: McJones
	Created file

Time: July 31, 1979  1:10 PM	By: McJones
	Changed pWindow to pDesc

Time: January 13, 1981  11:58 AM	By: Gobbel
	Made WriteLog be INLINE