-- CrossBinder.model, 11-May-83 11:21:41 PDT OPEN @TrinityPilot.model!2586712235; Feedback: TYPE~@Feedback.bcd; KernelFile: TYPE~@KernelFile.bcd; ProcessorFace: TYPE~@ProcessorFace.bcd; Strings: TYPE~@LongStrings.mesa!2579451954[LongString]; System: TYPE~@System.bcd; TemporarySpecialExecOps: TYPE~@TemporarySpecialExecOps.bcd; CrossBinder: PROC [DirectoryImpl: Directory, ExecImpl: Exec, ExecOpsImpl1: ExecOps, FileImpl: File, FileStreamImpl: FileStream, HeapImpl: Heap, InlineImpl: Inline, KernelFileImpl: KernelFile, LongStringImpl: LongString, ProcessorFaceImpl: ProcessorFace, RuntimeImpl: Runtime, SpaceImpl: Space, StreamImpl: Stream, StringsImpl: Strings, TimeImpl: Time, TransactionImpl: Transaction, TTYImpl: TTY, VolumeImpl: Volume] RETURNS [TemporarySpecialExecOpsImpl, ExecOpsImpl] [ Table: TYPE~@Table.mesa!2577115106; Alloc: TYPE~@Alloc.mesa!2585849506; CompilerSymbols: TYPE Symbols~@Symbols.mesa!2591895789[PrincOps, Table, TimeStamp]; CompilerLiterals: TYPE Literals~@Literals.mesa!2591823743[CompilerSymbols, Table]; CompilerTree: TYPE Tree~@Tree.mesa!2591824100[Table, CompilerLiterals, CompilerSymbols]; CompilerSymbolOps: TYPE SymbolOps~@SymbolOps.mesa!2591827562[ Alloc, Strings, CompilerSymbols, TimeStamp, CompilerTree]; SymbolSegment: TYPE~@SymbolSegment.mesa!2591823663[CompilerLiterals, CompilerSymbols, Table, TimeStamp, CompilerTree]; BcdDefs: TYPE~@tempBcdDefs.mesa!2582065272[PrincOps, Table, TimeStamp]; HashTypes: TYPE~@ProtoHashTypes.mesa!2587495537[Table]; LET [Symbols: TYPE, Literals: TYPE] ~ @BcdSymbols.mesa!2588531818[ BcdDefs, HashTypes, Table]; HashOps: TYPE~@ProtoHashOps.mesa!2586886101[Alloc, HashTypes, Strings]; Tree: TYPE~@BcdTree.mesa!2588531927[BcdDefs, Literals, Symbols, Table]; BcdLiterals: TYPE~@BcdLiterals.mesa!2584374539[Alloc, BcdDefs, BcdOps, Stream]; TreeOps: TYPE~@ProtoTreeOps.mesa!2588520733[Alloc, Literals, Symbols, Tree]; AllocImpl: Alloc~@AllocImpl.mesa!2585851003[Alloc, Environment, File, FileTypes, Heap, Inline, Runtime, Space, Volume, "-b-cj-ns", FileImpl, HeapImpl, InlineImpl, RuntimeImpl, SpaceImpl, VolumeImpl]; BcdOps: TYPE~@BcdOps.mesa!2563405009[BcdDefs]; BcdErrorDefs: TYPE~@BcdErrorDefs.mesa!2584374417[BcdDefs, BcdOps, Symbols, Strings]; BcdFileDefs: TYPE~@BcdFileDefs.mesa!2584374566[Alloc, BcdDefs, File]; FileSegment: TYPE~@FileSegment.mesa!2550689766[File]; OSMiscOps: TYPE~@OSMiscOps.mesa!2585846758[Environment, File, Strings, TimeStamp]; LET [SymbolPack: TYPE, SymbolPackImpl: SymbolPack, CompilerSymbolOpsImpl: CompilerSymbolOps] ~ @SymbolPack.mesa!2591827548[ Inline, CompilerLiterals, Strings, CompilerSymbols, CompilerSymbolOps, SymbolSegment, TimeStamp, CompilerTree, "-b-cj-ns", InlineImpl, StringsImpl]; SymbolTable: TYPE~@SymbolTable.mesa!2568557625[FileSegment, SymbolPack]; SymbolTableImpl: SymbolTable~@SymbolCache.mesa!2591914617[Environment, File, FileSegment, Heap, Space, CompilerSymbols, SymbolPack, SymbolSegment, SymbolTable, "-b-cj-ns", SymbolPackImpl, FileImpl, HeapImpl, SpaceImpl]; HashOpsImpl: HashOps~@ProtoHashTab.mesa!2587495541[Alloc, BcdOps, Environment, HashOps, HashTypes, Inline, Strings, "-b-cj-ns", AllocImpl, InlineImpl, StringsImpl]; BcdUtilDefs: TYPE~@BcdUtilDefs.mesa!2586445556[Alloc, BcdDefs, BcdOps, Symbols, Strings, Table, Tree]; BcdUtilDefsImpl: BcdUtilDefs~@tempBcdUtilities.mesa!2586894475[ Alloc, BcdDefs, BcdErrorDefs, BcdUtilDefs, HashOps, Inline, Strings, Symbols, Table, Tree, "-b-cj-ns", AllocImpl, BcdErrorDefsImpl, HashOpsImpl, InlineImpl, StringsImpl]; OSMiscOpsImpl: OSMiscOps~@OSMiscOpsImpl.mesa!2585847230[DCSFileTypes, Directory, File, Inline, KernelFile, OSMiscOps, ProcessorFace, Runtime, Space, Time, TimeStamp, "-b-cj-ns", DirectoryImpl, InlineImpl, KernelFileImpl, ProcessorFaceImpl, RuntimeImpl, SpaceImpl, TimeImpl]; BcdFileDefsImpl: BcdFileDefs~@BcdFileLookup.mesa!2580059935[ Alloc, BcdDefs, BcdFileDefs, BcdOps, BcdUtilDefs, File, OSMiscOps, Strings, Symbols, Table, "-b-cj-ns", AllocImpl, BcdUtilDefsImpl, OSMiscOpsImpl, StringsImpl]; CommandUtil: TYPE~@CommandUtil.mesa!2585845958[ExecOps, Stream, Strings]; LET [BcdComData: TYPE, BcdComDataImpl: BcdComData] ~ @BcdComData.mesa!2578345223[ Alloc, BcdDefs, CommandUtil, File, OSMiscOps, Stream, Strings, "-b-cj-ns"]; BcdBindDefs: TYPE~@BcdBindDefs.mesa!2584374196[BcdDefs, Symbols, Tree]; BcdControlDefs: TYPE~@BcdControlDefs.mesa!2588539475[BcdBindDefs, Tree, Stream]; CharIO: TYPE~@CharIO.mesa!2585844909[Format, Stream, Strings]; ParseTable: TYPE~@BcdParseTable.mesa!2588538177; P1: TYPE~@ProtoP1.mesa!2588538983[ParseTable, Stream, Strings]; RCMap: TYPE~@RCMap.mesa!2542132963; RCMapOps: TYPE~@RCMapOps.mesa!2591914765[RCMap, SymbolTable, CompilerSymbols]; RTBcd: TYPE~@RTBcd.mesa!2562263325[BcdDefs, RCMap, CompilerSymbols]; RCMapOpsImpl: RCMapOps~@RCMapBuilderImpl.mesa!2594744304[Inline, CompilerSymbols, SymbolTable, Environment, RCMap, RCMapOps, "-b-cj-ns", InlineImpl]; BcdLiteralsImpl: BcdLiterals~@BcdLiteralsImpl.mesa!2580057396[ Alloc, BcdDefs, BcdOps, BcdErrorDefs, BcdLiterals, Environment, Inline, OSMiscOps, RCMapOps, RTBcd, Stream, "-b-cj-ns", AllocImpl, BcdErrorDefsImpl, InlineImpl, OSMiscOpsImpl, RCMapOpsImpl, StreamImpl]; CharIOImpl: CharIO~@CharIOImpl.mesa!2585845746[CharIO, Stream, Strings, "-b-cj-ns", StringsImpl, StreamImpl]; CommandUtilImpl: CommandUtil~@CommandPack.mesa!2585846832[CommandUtil, Heap, Stream, Strings, "-b-cj-ns", HeapImpl, StreamImpl, StringsImpl]; TreeOpsImpl: TreeOps~@ProtoTreePack.mesa!2588540382[Alloc, Literals, Symbols, Tree, TreeOps, "-b-cj-ns", AllocImpl]; P1ImplA: P1~@BcdTreeBuild.mesa!2588538422[P1, ParseTable, Tree, TreeOps, "-b-cj-ns", P1Impl, TreeOpsImpl]; P1ImplB: P1~@ProtoScanner.mesa!2588538052[Ascii, CharIO, Environment, FileStream, HashOps, P1, ParseTable, Stream, Strings, "-b-cj-ns", CharIOImpl, FileStreamImpl, HashOpsImpl, StreamImpl, StringsImpl]; P1ImplC: P1~@ProtoParser.mesa!2588287864[CharIO, P1, ParseTable, Stream, Strings, "-b-cj-ns", CharIOImpl, P1Impl]; P1Impl: P1~(P1ImplA) PLUS (P1ImplB) PLUS (P1ImplC); LET [ExecOpsImpl2: ExecOps, TemporarySpecialExecOpsImpl: TemporarySpecialExecOps] ~ @CrossBcdControl.mesa!2588690620[ Alloc, BcdBindDefs, BcdComData, BcdControlDefs, BcdDefs, BcdErrorDefs, BcdFileDefs, BcdLiterals, BcdParseData, BcdUtilDefs, CharIO, CommandUtil, ExecOps, Feedback, File, FileStream, HashOps, Heap, LongString, OSMiscOps, P1, Runtime, Stream, Strings, Symbols, SymbolTable, TemporarySpecialExecOps, Time, Tree, TreeOps, "-b-cj-ns", AllocImpl, BcdControlDefsImpl, BcdErrorDefsImpl, BcdFileDefsImpl, BcdLiteralsImpl, BcdParseDataImpl, BcdUtilDefsImpl, CharIOImpl, CommandUtilImpl, ExecOpsImpl, FileStreamImpl, HashOpsImpl, HeapImpl, OSMiscOpsImpl, P1Impl, RuntimeImpl, StreamImpl, LongStringImpl, StringsImpl, SymbolTableImpl, TimeImpl, TreeOpsImpl, BcdComDataImpl]; ExecOpsImpl: ExecOps~(ExecOpsImpl2) THEN (ExecOpsImpl1); TestB: CONTROL~@CrossBinderImpl.mesa!2582131424[Exec, ExecOps, Feedback, Heap, TemporarySpecialExecOps, TTY, "-b-cj-ns", ExecImpl, HeapImpl, TemporarySpecialExecOpsImpl, TTYImpl]; BcdControlDefsImpl1: BcdControlDefs~@BcdSEBuild.mesa!2586889649[ Alloc, BcdComData, BcdControlDefs, BcdDefs, BcdUtilDefs, CommandUtil, HashOps, Strings, Symbols, Table, Tree, TreeOps, "-b-cj-ns", AllocImpl, BcdUtilDefsImpl, CommandUtilImpl, HashOpsImpl, StringsImpl, TreeOpsImpl, BcdComDataImpl]; BcdControlDefsImpl2: BcdControlDefs~@tempBcdLoad.mesa!2586894171[ Alloc, BcdBindDefs, BcdComData, BcdControlDefs, BcdDefs, BcdErrorDefs, BcdFileDefs, BcdLiterals, BcdOps, BcdUtilDefs, File, Inline, OSMiscOps, Space, Symbols, Table, Tree, TreeOps, "-b-cj-ns", AllocImpl, BcdErrorDefsImpl, BcdFileDefsImpl, BcdUtilDefsImpl, BcdLiteralsImpl, FileImpl, InlineImpl, OSMiscOpsImpl, SpaceImpl, TreeOpsImpl, BcdComDataImpl]; BcdControlDefsImpl3: BcdControlDefs~@tempBcdBind.mesa!2586894107[ Alloc, BcdBindDefs, BcdComData, BcdControlDefs, BcdDefs, BcdErrorDefs, BcdOps, BcdUtilDefs, HashOps, Strings, Symbols, Table, Tree, TreeOps, "-b-cj-ns", AllocImpl, BcdErrorDefsImpl, BcdUtilDefsImpl, HashOpsImpl, TreeOpsImpl, BcdComDataImpl]; BcdControlDefsImpl4: BcdControlDefs~@tempBcdWrite.mesa!2586894015[ Alloc, BcdComData, BcdControlDefs, BcdDefs, BcdErrorDefs, BcdLiterals, BcdOps, BcdUtilDefs, Environment, File, FileSegment, FileStream, ExecOps, HashOps, Inline, OSMiscOps, Space, Stream, Strings, Symbols, Table, Tree, TreeOps, "-b-cj-ns", AllocImpl, BcdErrorDefsImpl, BcdLiteralsImpl, BcdUtilDefsImpl, ExecOpsImpl, FileImpl, FileStreamImpl, HashOpsImpl, InlineImpl, OSMiscOpsImpl, SpaceImpl, StreamImpl, StringsImpl, TreeOpsImpl, BcdComDataImpl]; LET [BcdParseData: TYPE, BcdParseDataImpl: BcdParseData] ~ @BcdParseData.bcd; BcdControlDefsImpl5: BcdControlDefs~@tempBcdDebug.mesa!2586893965[ Alloc, BcdBindDefs, BcdComData, BcdControlDefs, BcdDefs, BcdOps, CharIO, HashOps, Strings, Symbols, Table, Time, Tree, TreeOps, "-b-cj-ns", AllocImpl, CharIOImpl, HashOpsImpl, TimeImpl, TreeOpsImpl, BcdComDataImpl]; BcdErrorDefsImpl1: BcdErrorDefs~@tempBcdSymbolPack.mesa!2598978657[ Alloc, BcdComData, BcdDefs, BcdErrorDefs, BcdFileDefs, BcdOps, File, FileSegment, OSMiscOps, Space, Strings, CompilerSymbols, SymbolTable, "-b-cj-ns", AllocImpl, BcdFileDefsImpl, BcdComDataImpl, OSMiscOpsImpl, SpaceImpl, StringsImpl, SymbolTableImpl]; BcdErrorDefsImpl2: BcdErrorDefs~@BindErrors.mesa!2586889323[ Alloc, BcdComData, BcdControlDefs, BcdDefs, BcdErrorDefs, BcdOps, CharIO, FileStream, HashOps, Stream, Strings, Symbols, Table, "-b-cj-ns", AllocImpl, BcdErrorDefsImpl, CharIOImpl, FileStreamImpl, HashOpsImpl, StreamImpl, BcdComDataImpl]; BcdErrorDefsImpl: BcdErrorDefs~(BcdErrorDefsImpl1) PLUS (BcdErrorDefsImpl2); BcdControlDefsImpl: BcdControlDefs~(BcdControlDefsImpl1) PLUS (BcdControlDefsImpl2) PLUS (BcdControlDefsImpl3) PLUS (BcdControlDefsImpl4) PLUS (BcdControlDefsImpl5) ]