file ErrorTable.Mesa
last modified by Satterthwaite, 23-Oct-81 14:25:08
last modified by Russ Atkinson, 14-Oct-80 16:09:46
DIRECTORY
Log: TYPE USING [ErrorCode],
Tree: TYPE USING [NodeName];
ErrorTable: DEFINITIONS = {
CSRptr: TYPE = LONG BASE POINTER TO CompStrRecord;
CompStrDesc: TYPE = RECORD[offset, length: CARDINAL];
CompStrRecord:
TYPE =
RECORD [
stringOffset: CSRptr RELATIVE POINTER TO StringBody,
OpName: ARRAY Tree.NodeName[assignx..uparrow] OF CompStrDesc,
FnName: ARRAY Tree.NodeName[min..nil] OF CompStrDesc,
ErrorMessages: ARRAY Log.ErrorCode OF CompStrDesc];
}.