DIRECTORY BcdDefs USING [BCD, BcdBase, CTHandle, CTIndex, EVHandle, EVIndex, EXPHandle, EXPIndex, FPHandle, FPIndex, FTHandle, FTIndex, IMPHandle, IMPIndex, MTHandle, MTIndex, Namee, NameRecord, NTHandle, NTIndex, SGHandle, SGIndex, SPHandle, SPIndex, VersionStamp]; BcdOps: DEFINITIONS = BEGIN OPEN BcdDefs; ProcessConfigs: PROC [ bcd: BcdBase, proc: PROC [CTHandle, CTIndex] RETURNS [BOOL]] RETURNS [cth: CTHandle, cti: CTIndex]; ProcessExternals: PROC [ bcd: BcdBase, proc: PROC [EVHandle, EVIndex] RETURNS [BOOL]] RETURNS [evh: EVHandle, evi: EVIndex]; ProcessExports: PROC [ bcd: BcdBase, proc: PROC [EXPHandle, EXPIndex] RETURNS [BOOL]] RETURNS [eth: EXPHandle, eti: EXPIndex]; ProcessFiles: PROC [ bcd: BcdBase, proc: PROC [FTHandle, FTIndex] RETURNS [BOOL]] RETURNS [fth: FTHandle, fti: FTIndex]; ProcessImports: PROC [ bcd: BcdBase, proc: PROC [IMPHandle, IMPIndex] RETURNS [BOOL]] RETURNS [ith: IMPHandle, iti: IMPIndex]; ProcessModules: PROC [ bcd: BcdBase, proc: PROC [MTHandle, MTIndex] RETURNS [BOOL]] RETURNS [mth: MTHandle, mti: MTIndex]; ProcessNames: PROC [ bcd: BcdBase, proc: PROC [NTHandle, NTIndex] RETURNS [BOOL]] RETURNS [nth: NTHandle, nti: NTIndex]; ProcessSegs: PROC [ bcd: BcdBase, proc: PROC [SGHandle, SGIndex] RETURNS [BOOL]] RETURNS [sgh: SGHandle, sgi: SGIndex]; ProcessSpaces: PROC [ bcd: BcdBase, proc: PROC [SPHandle, SPIndex] RETURNS [BOOL]] RETURNS [sph: SPHandle, spi: SPIndex]; ProcessFramePacks: PROC [ bcd: BcdBase, proc: PROC [FPHandle, FPIndex] RETURNS [BOOL]] RETURNS [fph: FPHandle, fpi: FPIndex]; FindName: PROC [bcd: BcdBase, owner: Namee] RETURNS [name: NameRecord]; ModuleVersion: PROC [bcd: BcdBase, mti: MTIndex] RETURNS [version: VersionStamp]; END. ͺBcdOps.mesa Copyright c 1985 by Xerox Corporation. All rights reserved. Satterthwaite on 25-Mar-82 16:56:47 Paul Rovner on May 12, 1983 5:03 pm Russ Atkinson (RRA) January 31, 1985 11:00:42 am PST Doug Wyatt, February 27, 1985 9:16:37 am PST For all of these enumerators, if proc returns TRUE then we quit, otherwise we continue. In general, if NIL is returned for any handle, then the enumeration did not quit early. ΚŒ˜codešœ ™ Kšœ Οmœ1™Kšžœ!˜(—K˜š  œžœ˜Kšœžœžœžœ˜Kšžœ!˜(—K˜š œžœ˜Kšœžœžœžœ˜