-- file CommandTable.Mesa
-- Edited by:
--            Bruce, August 26, 1980  6:59 PM

DIRECTORY
  CommandList USING [Command, Error];

CommandTable: DEFINITIONS =
  BEGIN
  
  CSRptr: TYPE = LONG BASE POINTER TO CompStrRecord;
  CompStrDesc: TYPE = RECORD [offset, length: CARDINAL];
  
  CompStrRecord: TYPE = RECORD [
    stringOffset: CSRptr RELATIVE POINTER TO StringBody,
    CommandStrings: ARRAY CommandList.Command OF CompStrDesc,
    ErrorMessages: ARRAY CommandList.Error OF CompStrDesc];

  END.