<> <> <> <> DIRECTORY Alloc: TYPE USING [Notifier], BcdDefs: TYPE USING [MTIndex, VersionStamp], FileSegment: TYPE USING [Pages], Rope: TYPE USING [ROPE], RTBcd: TYPE USING [RTBase], Symbols: TYPE USING [HTIndex, ISEIndex], SymbolTable: TYPE USING [Base], Table: TYPE USING [Base, Selector], VM: TYPE USING [Interval]; ListerDefs: DEFINITIONS = { IncorrectVersion: SIGNAL; Load: PROC [name: Rope.ROPE] RETURNS [code, symbols, bcd: FileSegment.Pages]; LoadFromConfig: PROC [configName, moduleName: Rope.ROPE] RETURNS [code, symbols, bcd: FileSegment.Pages, mti: BcdDefs.MTIndex]; NoFile, NoCode, NoSymbols, NoFGT, MultipleModules: SIGNAL; MapPages: PROC [FileSegment.Pages] RETURNS [VM.Interval]; WriteVersionId: PROC [stamp: BcdDefs.VersionStamp]; WriteVersions: PROC [ version, creator, source: LONG POINTER TO BcdDefs.VersionStamp _ NIL]; SetRoutineSymbols: PROC [s: SymbolTable.Base]; PrintHti: PROC [hti: Symbols.HTIndex]; PrintSei: PROC [sei: Symbols.ISEIndex]; Indent: PROC [n: CARDINAL]; PrintMachine: PROC [stamp: BcdDefs.VersionStamp]; WriteFileID: PROC; <> AddNotify: PROC [proc: Alloc.Notifier]; DropNotify: PROC [proc: Alloc.Notifier]; Bounds: PROC [table: Table.Selector] RETURNS [base: Table.Base, size: CARDINAL]; <> WriteChar: PROC [CHARACTER]; WriteString: PROC [Rope.ROPE]; WriteLine: PROC [Rope.ROPE]; WriteOctal: PROC [UNSPECIFIED]; WriteDecimal: PROC [INTEGER]; <> PrintRTBcd: PROC [RTBcd.RTBase]; }.