
    <<ErrorTable.Mesa>>
        <<Copyright © 1985 by Xerox Corporation.  All rights reserved.>>
        <<Satterthwaite, 23-Oct-81 14:25:08>>
        <<Russ Atkinson (RRA) March 6, 1985 10:11:42 pm PST>>
        <<Satterthwaite December 23, 1985 12:26:09 pm PST>>

    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..$new] OF CompStrDesc,
            ApplName: ARRAY Tree.NodeName[$apply..$joinx] OF CompStrDesc,
            FApplName: ARRAY Tree.NodeName[$restart..$broadcast] OF CompStrDesc,
            ErrorMessages: ARRAY Log.ErrorCode OF CompStrDesc];

        }.

