-- Copyright (C) 1984  by Xerox Corporation. All rights reserved. 
-- UnpackedBasicHeadsDicentra.config, HGM,  4-Nov-84  5:40:33

PACK --ALL--  -- resident code
    ProcessorHeadDicentra, RealMemoryImplDicentra,
    EthernetHeadDicentra, EthernetOneHeadDicentra,
    TTYPortHeadDicentra,
    GMTUsingIntervalTimer, SetGMTUsingEthernet, TextBltImpl,
    SA4000HeadDummy, SA800HeadDummy,
    EERomDicentra, WatchdogDicentra;
  
BasicHeadsDicentra: CONFIGURATION LINKS: CODE
  IMPORTS
     BitBlt, DeviceCleanup, DicentraInputOutput, Frame, Inline, PageMap,
     ProcessOperations, ResidentHeap, Process, Runtime, SpecialRuntime, System
  EXPORTS
    BeepFace, DisplayFace, KeyboardFace, MouseFace,
    EthernetFace, EthernetOneFace,
    HeadStartChain1: HeadStartChain, PilotDiskFace, ProcessorFace,
    RealMemory, SA800Face, TemporarySetGMT, TTYPortFace,
    EERom, Watchdog =
  BEGIN
  
  ProcessorHeadDicentra;
  RealMemoryImplDicentra;
  GMTUsingIntervalTimer;  --  I don't know how this gets started
  SetGMTUsingEthernet;
  
  
  [HeadStartChain1, EthernetFace] ←
    EthernetHeadDicentra [
      HeadStartChain2, DicentraInputOutput, Inline, Process, Runtime, SpecialRuntime, System];
  
  [HeadStartChain2, EthernetOneFace] ←
    EthernetOneHeadDicentra [
      HeadStartChain3, DicentraInputOutput, Inline, Process, Runtime, SpecialRuntime];
  
  [HeadStartChain3, BeepFace, DisplayFace, DriverStartChain, KeyboardFace, MouseFace] ←
    DisplayHeadDummy [HeadStartChain4];

  [HeadStartChain4, PilotDiskFace] ← SA4000HeadDummy [HeadStartChain5];
  
  [HeadStartChain5, SA800Face] ← SA800HeadDummy [HeadStartChain6];
  
  [HeadStartChain6, TextBlt] ← TextBltImpl[BitBlt, Frame, HeadStartChain7];
  
  [HeadStartChain7] ← HeadStartChainPlug [];
  

  TTYPortHeadDicentra;
  
  EERomDicentra;
  WatchdogDicentra;

  
  END.