-- BcdInfoDefs.mesa; edited by Sandman on July 8, 1980  8:49 AM
-- Copyright  Xerox Corporation 1979, 1980

DIRECTORY
  BcdDefs USING [MTIndex],
  BcdOps USING [BcdBase],
  SegmentDefs USING [FileSegmentHandle];

BcdInfoDefs: DEFINITIONS =
  BEGIN
  
  SetBcd: PROCEDURE [name: STRING] RETURNS [bcd: BcdOps.BcdBase];
  FindAllFiles: PROCEDURE;
  CodeForModule, SymbolsForModule: PROCEDURE [mti: BcdDefs.MTIndex]
    RETURNS [seg: SegmentDefs.FileSegmentHandle];
  
  END...