<> <> <> <> <> DIRECTORY DriverDefs USING [Boss], GermSwap USING [switches], MPCodes USING [communicationInitialized], ProcessorFace USING [SetMP], StatsOps USING [StatsHot]; CommunicationControl: MONITOR IMPORTS DriverDefs, GermSwap, ProcessorFace, StatsOps = BEGIN StartupCommunication: PROCEDURE = <> BEGIN START StatsOps.StatsHot; <> START DriverDefs.Boss; ProcessorFace.SetMP[MPCodes.communicationInitialized]; END; InitializeCommunication: PUBLIC PROCEDURE = <> BEGIN <> END; <
> IF NOT GermSwap.switches[c] THEN StartupCommunication[]; END. -- CommunicationControl module LOG Time: January 20, 1980 11:01 AM By: Dalal Action: changed initialization order. Time: February 5, 1980 8:31 PM By: Dalal Action: started of SimpleHeapImpl. Time: February 5, 1980 9:16 PM By: Dalal Action: added Echo Server. Time: August 18, 1978 11:37 AM By: Knutsen Action: Module now STARTed by InitializeCommunication[]. Time: May 6, 1980 6:35 PM By: BLyon Action: Temp removed CommunicationPrograms from EXPORTS; added mainline code so that Communications can be build/started seperately from TestPilotKernel .. tajo. Time: August 11, 1980 3:39 PM By: BLyon Action: made it so that communication can start on a start trap (added running: BOOLEAN). Time: August 20, 1980 10:38 AM By: BLyon Action: added START ChecksumsImpl Time: October 22, 1980 3:56 PM By: BLyon Action: IF (useCount=0) THEN RETURN in OiscpPackageDestroy.