[Indigo]<Cedar>Binder>BcdErrorDefs.mesa!6

BcdErrorDefs.mesa

Last edited by Satterthwaite on November 23, 1982 9:46 am

Last edited by Lewis on 27-Mar-81 9:53:21

Last Edited by: Maxwell, August 4, 1983 9:29 am

DIRECTORY

BcdDefs: TYPE USING [FTIndex, MTIndex, NameRecord, NameString, VersionStamp],

ConvertUnsafe: TYPE USING [SubString],

Symbols: TYPE USING [HTIndex, STIndex];

BcdErrorDefs: DEFINITIONS={

OPEN Symbols, BcdDefs;

ErrorClass: TYPE~{error, warning};

InterfaceId: TYPE~RECORD [name: NameRecord, fti: FTIndex];

GetModule: SIGNAL RETURNS [errorMti: MTIndex, linkOffset: CARDINAL];

GetSti: SIGNAL RETURNS [errorSti: STIndex];

Error: PROC [class: ErrorClass, s: STRING];

ErrorSti: PROC [class: ErrorClass, s: STRING, sti: STIndex];

ErrorHti: PROC [class: ErrorClass, s: STRING, hti: HTIndex];

ErrorName: PROC [class: ErrorClass, s: STRING, name: NameRecord];

ErrorItem: PROC [class: ErrorClass, s: STRING, export: InterfaceId, ep: CARDINAL];

ErrorModule: PROC [class: ErrorClass, s: STRING, mti: MTIndex];

ErrorFile: PROC [class: ErrorClass, s: STRING, fti: FTIndex];

Error2Files: PROC [class: ErrorClass, s: STRING, ft1, ft2: FTIndex];

ErrorInterface: PROC [class: ErrorClass, s: STRING, import: InterfaceId, ep: CARDINAL];

ErrorNameBase: PROC [

class: ErrorClass, s: STRING, name: NameRecord, base: BcdDefs.NameString];

Error2Versions: PROC [class: ErrorClass, fileName: NameRecord, v1, v2: VersionStamp];

exported by BcdSymbolPack

ImportItemName: PRIVATE PROC [

import: InterfaceId, ep: CARDINAL,

clientMti: MTIndex, linkOffset: CARDINAL,

userProc: PROC [ConvertUnsafe.SubString]];

ExportItemName: PRIVATE PROC [

export: InterfaceId, ep: CARDINAL,

userProc: PROC [ConvertUnsafe.SubString]];

Initialize, Finalize: PROC;