<> <> <> <> <> <> <> DIRECTORY YggDummyProcess, YggWorkerInternal; YggWorkerLogWatchdogImpl: CEDAR MONITOR IMPORTS YggDummyProcess, YggWorkerInternal EXPORTS YggWorkerInternal = BEGIN watchdogRunning: BOOL _ FALSE; oldWorkerPresent: CONDITION; NotifyLogWatchdog: PUBLIC ENTRY PROC [] = { IF NOT watchdogRunning THEN TRUSTED { YggDummyProcess.Detach[FORK YggWorkerInternal.WorkerLogWatchdogProcess[]]; watchdogRunning _ TRUE; } ELSE NOTIFY oldWorkerPresent; }; WaitForNotify: PUBLIC ENTRY PROC [] = { WAIT oldWorkerPresent; }; END.--WorkerLogWatchdogImpl CHANGE LOG Created by MBrown on April 3, 1983 9:07 am <> <> <<>>