-- File: BootingWartOld.mesa - last edit:
-- AOF                 15-Feb-88 14:20:50

-- Copyright (C) 1988 by Xerox Corporation. All rights reserved.

DIRECTORY
  BootingWart USING[Interface],
  SpecialBooting: FROM "OldSpecialBooting" USING[
    BootFromEthernet, BootFromEthernetOne];

BootingWartOld: PROGRAM
  IMPORTS SpecialBooting EXPORTS BootingWart =
  BEGIN
  interface: PUBLIC BootingWart.Interface ← [
    LOOPHOLE[SpecialBooting.BootFromEthernet],
    SpecialBooting.BootFromEthernetOne];
  END...   --BootingWartOld