-- BcdControlDefs.mesa
-- Last edited by Satterthwaite on January 10, 1983 2:44 pm
-- Last edited by Lewis on 21-Apr-81 15:45:10

DIRECTORY
  BcdBindDefs: TYPE USING [RelocHandle],
  Tree: TYPE USING [Link],
  Stream: TYPE USING [Handle];

BcdControlDefs: DEFINITIONS={

  nullSourceIndex: CARDINAL~CARDINAL.LAST;

  BuildSemanticEntries: PROC [root: Tree.Link];
  LoadRoot: PROC [root: Tree.Link] RETURNS [BcdBindDefs.RelocHandle];
  BindRoot: PROC [relocationRoot: BcdBindDefs.RelocHandle];
  WriteBcd: PROC [root: Tree.Link];

  BuildSEError: ERROR;
  LoadError: ERROR;
  BindError: ERROR;
  BcdWriteError: ERROR;
  InvalidFileFormat: ERROR;

  PrintTree: PROC [Tree.Link];
  PrintSemanticEntries: PROC;
  PrintBcd: PROC;
  PrintRelocations: PROC [BcdBindDefs.RelocHandle];

  FormatTree: PROC [Stream.Handle, Tree.Link];
  
  }.