DIRECTORYAlloc: TYPE USING [Handle],BcdDefs: TYPE USING [CTIndex, EXPIndex, FPIndex, FTIndex, IMPIndex, MTIndex,Namee, NameRecord, NameString, NTIndex, SGIndex, SGRecord,SPIndex, TMIndex, TYPIndex, VersionStamp],PrincOps: TYPE USING [GFTIndex],ConvertUnsafe: TYPE USING [SubString],Symbols: TYPE USING [CXIndex, HTIndex, STIndex],Table: TYPE USING [Base],Tree: TYPE USING [Link];BcdUtilDefs: DEFINITIONS={OPEN BcdDefs;HTIndex: TYPE~Symbols.HTIndex;BcdBasePtr: TYPE~REF BcdBases;BcdBases: TYPE~RECORD [ctb, mtb, lfb, rfb, tfb, etb, itb, sgb, ftb, evb, tyb, tmb, ntb, spb, fpb: Table.Base,ssb: BcdDefs.NameString];BcdLimits: TYPE~RECORD [ft: FTIndex,ct: CTIndex,mt: MTIndex,et: EXPIndex,it: IMPIndex,sg: SGIndex,nt: NTIndex,tm: TMIndex,sp: SPIndex,fp: FPIndex];EnterConfig: PROC [bcd: BcdBasePtr, oldCti: CTIndex, name: HTIndex]RETURNS [cti: CTIndex];EnterExport: PROC [bcd: BcdBasePtr, oldEti: EXPIndex, copyName: BOOL]RETURNS [eti: EXPIndex];EnterFramePack: PROC [bcd: BcdBasePtr, oldFpi: FPIndex]RETURNS [fpi: FPIndex];EnterImport: PROC [bcd: BcdBasePtr, oldIti: IMPIndex, copyName: BOOL]RETURNS [iti: IMPIndex];EnterModule: PROC [bcd: BcdBasePtr, oldMti: MTIndex, name: HTIndex]RETURNS [mti: MTIndex];EnterSpace: PROC [bcd: BcdBasePtr, oldSpi: SPIndex]RETURNS [spi: SPIndex];EnterType: PROC [bcd: BcdBasePtr, oldTypi: TYPIndex]RETURNS [typi: TYPIndex];EnterTypeMap: PROC [bcd: BcdBasePtr, oldTmi: TMIndex]RETURNS [tmi: TMIndex];HtiForName: PROC [bcd: BcdBasePtr, n: NameRecord] RETURNS [HTIndex];MapName: PROC [bcd: BcdBasePtr, n: NameRecord] RETURNS [NameRecord];MergeFile: PROC [bcd: BcdBasePtr, oldFti: FTIndex] RETURNS [fti: FTIndex];EnterName: PROC [ss: ConvertUnsafe.SubString] RETURNS [NameRecord];NameForHti: PROC [hti: HTIndex] RETURNS [NameRecord];NameForSti: PROC [sti: Symbols.STIndex] RETURNS [NameRecord];EnterFile: PROC [name: LONG STRING] RETURNS [fti: FTIndex];SetFileVersion: PROC [fti: FTIndex, v: BcdDefs.VersionStamp];FileForVersion: PROC [v: BcdDefs.VersionStamp] RETURNS [fti: FTIndex];EqVersions: PROC [fti1, fti2: FTIndex] RETURNS [BOOL];EquivalentVersions: PROC [v1, v2: BcdDefs.VersionStamp] RETURNS [BOOL];GftOverflow: SIGNAL;GetGfi: PROC [n: CARDINAL] RETURNS [gfi: PrincOps.GFTIndex];GetDummyGfi: PROC [n: CARDINAL] RETURNS [gfi: CARDINAL];NewContext: PROC RETURNS [cxi: Symbols.CXIndex];ContextForTree: PROC [t: Tree.Link] RETURNS [Symbols.CXIndex];NewSemanticEntry: PROC [hti: HTIndex] RETURNS [sti: Symbols.STIndex];CreateInstanceName: PROC [hti: HTIndex, item: Namee];InstanceName: PROC [item: Namee] RETURNS [NameRecord];EnterSegment: PROC [seg: SGRecord] RETURNS [sgi: SGIndex];Init: PROC [ownTable: Alloc.Handle];Reset: PROC;}.  &  BcdUtilDefs.MesaLast edited by Satterthwaite on December 17, 1982 9:05 amLast edited by Lewis on 16-Dec-80 10:42:45Last Edited by: Maxwell, August 4, 1983 9:30 amLast Edited by: Paul Rovner, September 9, 1983 9:12 ambcd-specific operationsother operationsadministrative proceduresЭ╩╗  Ш JЪЬЩJЪЬ9Щ9JЪЬ*Щ*JЩ/JЩ6JШ Ъ╧k	Ш	JЪЬЭЬЭЬ
ШЪЬ	ЭЬЭЬШJШ7JЪЬ:Ш:JШ*ЧJЪЬ
ЭЬЭЬШ JЪЬЭЬЭЬШ&JЪЬ	ЭЬЭЬШ0JЪЬЭЬЭЬШJЪЬЭЬЭЬШJШ ЧЪЬЭЬШJЪЭЬ	ШJШ JЪЬ	ЭЬШJШ JЪЬЭЬЭЬ
ШЪЬ
ЭЬЭЬШJШVJЪЬШJШ ЧЪЬЭЬЭЬШJШJШJШJШJШJШJШJШJШJШJШ ЧJЪЬЩШ Ъ╧nЬЭЬ2ШCJЪЭЬШЧЪЮЬЭЬ/ЭЬШEJЪЭЬШЧЪЮЬЭЬ#Ш7JЪЭЬШЧЪЮЬЭЬ/ЭЬШEJЪЭЬШЧЪЮЬЭЬ2ШCJЪЭЬШЧЪЮ
ЬЭЬ#Ш3JЪЭЬШЧЪЮ	ЬЭЬ%Ш4JЪЭЬШЧЪЮЬЭЬ#Ш5JЪЭЬШJШ ЧJЪЮ
ЬЭЬ"ЭЬШDJЪЮЬЭЬ"ЭЬШDJЪЮ	ЬЭЬ$ЭЬШJJШ ЧJЪЬЩШ JЪЮ	ЬЭЬЭЬШCJЪЮ
ЬЭЬЭЬШ5JЪЮ
ЬЭЬЭЬШ=JШ JЪ
Ю	ЬЭЬЭЬЭЬЭЬШ;JЪЮЬЭЬ)Ш=JЪЮЬЭЬЭЬШFJЪЮ
ЬЭЬЭЬЭЬШ6JЪЮЬЭЬ ЭЬЭЬШGJШ JЪЬЭЬШJЪЮЬЭЬЭЬЭЬШ<JЪ
ЮЬЭЬЭЬЭЬЭЬШ8JШ JЪЮ
ЬЭЬЭЬШ0JЪЮЬЭЬЭЬШ>JЪЮЬЭЬЭЬШEJШ JЪЮЬЭЬШ5JЪЮЬЭЬЭЬШ6JШ JЪЮЬЭЬЭЬШ:JШ JЪЬЩJШ JЪЮЬЭЬШ$JЪЮЬЭЬШJШ JШJШ ЧЧЧ ЕЧ    
┬  г  