-- File: PackagerBcdTabDriver.mesa
-- Last edited by Sweet on July 10, 1980  3:07 PM
-- Last edited by Lewis on October 1, 1980  4:39 PM
-- last edited by Levin on September 8, 1982 4:35 pm

DIRECTORY
  BcdDefs USING [NameRecord, VersionStamp],
  BcdErrorDefs USING [ErrorClass],
  SymbolOps: FROM "BcdSymbolOps" USING [Finalize, Initialize],
  PackagerDefs USING [globalData],
  PackCode USING [];

PackagerBcdTabDriver: PROGRAM 
  IMPORTS PackagerDefs, SymbolOps 
  EXPORTS BcdErrorDefs, PackCode =
  BEGIN

  Error2Versions: PUBLIC PROC [
      class: BcdErrorDefs.ErrorClass, 
      fileName: BcdDefs.NameRecord, v1, v2: BcdDefs.VersionStamp] =
    {NULL}; -- exported to BcdErrorDefs

  InitBcdTab: PUBLIC PROC = {SymbolOps.Initialize[PackagerDefs.globalData.ownTable]};

  FinalizeBcdTab: PUBLIC PROC = {SymbolOps.Finalize[]};

  END.