DIRECTORY MobDefs USING [FTIndex, MTIndex, NameRecord, VersionStamp, Link], ConvertUnsafe USING [SubString], MobSymbols USING [HTIndex, STIndex]; MobErrorDefs: DEFINITIONS = { OPEN MobSymbols, MobDefs; ErrorClass: TYPE~{error, warning}; InterfaceId: TYPE~RECORD[name: NameRecord, fti: FTIndex]; GetModule: SIGNAL RETURNS[errorMti: MTIndex, linkOffset: CARDINAL, link: MobDefs.Link]; 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: LONG STRING]; Error2Versions: PROC[class: ErrorClass, fileName: NameRecord, v1, v2: VersionStamp]; ImportItemName: PRIVATE PROC[ import: InterfaceId, ep: CARDINAL, clientMti: MTIndex, linkOffset: CARDINAL, link: MobDefs.Link, userProc: PROC[ConvertUnsafe.SubString]]; ExportItemName: PRIVATE PROC[ export: InterfaceId, ep: CARDINAL, userProc: PROC[ConvertUnsafe.SubString]]; Initialize, Finalize: PROC; }. h MobErrorDefs.mesa Copyright Σ 1985, 1989, 1991 by Xerox Corporation. All rights reserved. Satterthwaite on February 27, 1986 12:13:33 pm PST Lewis on 27-Mar-81 9:53:21 Maxwell, August 4, 1983 9:29 am Russ Atkinson (RRA) March 7, 1985 0:05:16 am PST Andy Litman March 23, 1988 8:02:19 pm PST JKF July 22, 1989 3:53:01 pm PDT exported by MobSymbolPack Κc–(cedarcode) style•NewlineDelimiter ™codešœ™Kšœ Οeœ=™HKšΟy2™2Kšž™Kšž™K™0Kšž)™)K™ —K˜šΟk ˜ KšœŸœ4˜AKšœŸœ ˜ Kšœ Ÿœ˜$K˜—šΟn œŸ œ˜KšŸœ˜K˜Kšœ Ÿœ˜"Kšœ ŸœŸœ!˜9K˜Kš  œŸœŸœ Ÿœ˜WKš œŸœŸœ˜*K˜Kš œŸœŸœ˜*Kš œŸœŸœ˜;Kš œŸœŸœ˜;Kš  œŸœŸœ˜@Kš  œŸœŸœŸœ˜QKš  œŸœŸœ˜>Kš  œŸœŸœ˜