-- Binder.Model, 15-Sep-82 9:45:17 PDT
OPEN @BasicPilot.model!2565894086;
Feedback: TYPE == @Feedback.bcd;
KernelFile: TYPE == @KernelFile.bcd;
ProcessorFace: TYPE == @ProcessorFace.bcd;
System: TYPE == @System.bcd;
TemporarySpecialExecOps: TYPE == @TemporarySpecialExecOps.bcd;
Binder: 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,
UserTerminalImpl: UserTerminal,
VolumeImpl: Volume]
RETURNS [TemporarySpecialExecOpsImpl, ExecOpsImpl] [
Table: TYPE == @Table.mesa!2577115106;
Alloc: TYPE == @Alloc.mesa!2548347750;
CompilerSymbols: TYPE Symbols == @Symbols.mesa!2565302638[PrincOps,
Table, TimeStamp];
CompilerLiterals: TYPE Literals == @Literals.mesa!2550173704[
CompilerSymbols, Table];
CompilerTree: TYPE Tree == @Tree.mesa!2558456374[Table, CompilerLiterals,
CompilerSymbols];
CompilerSymbolOps: TYPE SymbolOps == @SymbolOps.mesa!2559578970[
Alloc, Strings, CompilerSymbols, TimeStamp, CompilerTree];
SymbolSegment: TYPE == @SymbolSegment.mesa!2548600256[CompilerLiterals,
CompilerSymbols, Table, TimeStamp, CompilerTree];
BcdDefs: TYPE == @BcdDefs.mesa!2565550795[PrincOps, Table, TimeStamp];
Symbols: TYPE == @BcdSymbols.mesa!2578341667[BcdDefs, Table];
SymbolOps: TYPE == @BcdSymbolOps.mesa!2570457549[Alloc, Symbols,
Strings];
LET [Tree: TYPE, Literals: TYPE] == @BcdTree.mesa!2578342674[
BcdDefs, Symbols, Table];
BcdLiterals: TYPE == @BcdLiterals.mesa!2565031220[Alloc, BcdDefs,
BcdOps, Stream];
TreeOps: TYPE == @TreeOps.mesa!2566506225[Alloc, Literals, Symbols,
Tree];
AllocImpl: Alloc == @AllocImpl.mesa!2573145002[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!2570457936[BcdDefs,
BcdOps, Symbols, Strings];
BcdFileDefs: TYPE == @BcdFileDefs.mesa!2564593195[Alloc, BcdDefs,
File];
FileSegment: TYPE == @FileSegment.mesa!2550689766[File];
OSMiscOps: TYPE == @OSMiscOps.mesa!2570646172[Environment, File,
Strings, TimeStamp];
LET [SymbolPack: TYPE, SymbolPackImpl: SymbolPack, CompilerSymbolOpsImpl: CompilerSymbolOps] == @SymbolPack.mesa!2559578211[
Inline, CompilerLiterals, Strings, CompilerSymbols, CompilerSymbolOps,
SymbolSegment, TimeStamp, CompilerTree, "-b-cj-ns", InlineImpl,
StringsImpl];
SymbolTable: TYPE == @SymbolTable.mesa!2568557625[FileSegment,
SymbolPack];
SymbolTableImpl: SymbolTable == @SymbolCache.mesa!2568562284[
Environment, File, FileSegment, Heap, Space, Symbols,
SymbolPack, SymbolSegment, SymbolTable, "-b-cj-ns",
SymbolPackImpl, FileImpl, HeapImpl, SpaceImpl];
SymbolOpsImpl: SymbolOps == @BcdTab.mesa!2578321143[Alloc, BcdDefs,
Environment, Inline, Strings, Symbols, SymbolOps,
Table, "-b-cj-ns", AllocImpl, InlineImpl, StringsImpl];
BcdUtilDefs: TYPE == @BcdUtilDefs.mesa!2570457990[Alloc, BcdDefs,
BcdOps, Symbols, Strings, Table, Tree];
BcdUtilDefsImpl: BcdUtilDefs == @BcdUtilities.mesa!2578344970[
Alloc, BcdDefs, BcdErrorDefs, BcdUtilDefs, Inline,
Strings, Symbols, SymbolOps, Table, Tree, "-b-cj-ns",
AllocImpl, BcdErrorDefsImpl, InlineImpl, SymbolOpsImpl,
StringsImpl];
OSMiscOpsImpl: OSMiscOps == @OSMiscOpsImpl.mesa!2576702530[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!2578329078[
Alloc, BcdDefs, BcdFileDefs, BcdOps, BcdUtilDefs,
File, OSMiscOps, Strings, Symbols, Table, "-b-cj-ns",
AllocImpl, BcdUtilDefsImpl, OSMiscOpsImpl, StringsImpl];
CommandUtil: TYPE == @CommandUtil.mesa!2550530585[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!2570457860[BcdDefs, Symbols,
Tree];
LET [BcdControlDefs: TYPE, CompilerUtil: TYPE] == @BcdControlDefs.mesa!2578343242[
BcdBindDefs, Tree, Stream];
CharIO: TYPE == @CharIO.mesa!2557696230[Format, Stream, Strings];
ParseTable: TYPE == @BcdParseTable.mesa!2578349631;
P1: TYPE == @BcdParseDefs.mesa!2570457815[ParseTable, Stream,
Strings];
RCMap: TYPE == @RCMap.mesa!2542132963;
RCMapOps: TYPE == @RCMapOps.mesa!2571783951[RCMap, SymbolTable,
CompilerSymbols];
RTBcd: TYPE == @RTBcd.mesa!2562263325[BcdDefs, RCMap, CompilerSymbols];
RCMapOpsImpl: RCMapOps == @RCMapBuilderImpl.mesa!2571784385[
Inline, Table, CompilerSymbols, SymbolTable, Environment,
RCMap, RCMapOps, "-b-cj-ns", InlineImpl];
BcdLiteralsImpl: BcdLiterals == @BcdLiteralsImpl.mesa!2578345124[
Alloc, BcdDefs, BcdOps, BcdErrorDefs, BcdLiterals,
Environment, Inline, OSMiscOps, RCMapOps, RTBcd,
Stream, "-b-cj-ns", AllocImpl, BcdErrorDefsImpl,
InlineImpl, OSMiscOpsImpl, RCMapOpsImpl, StreamImpl];
CharIOImpl: CharIO == @CharIOImpl.mesa!2568311174[CharIO, Stream,
Strings, "-b-cj-ns", StringsImpl, StreamImpl];
CommandUtilImpl: CommandUtil == @CommandPack.mesa!2577563439[
Ascii, CharIO, CommandUtil, Heap, Stream, Strings,
"-b-cj-ns", CharIOImpl, HeapImpl, StringsImpl];
TreeOpsImpl: TreeOps == @TreePack.mesa!2568314087[Alloc, Literals,
Symbols, Tree, TreeOps, "-b-cj-ns", AllocImpl];
P1ImplA: P1 == @BcdTreeBuild.mesa!2578349623[P1, ParseTable,
Tree, TreeOps, "-b-cj-ns", P1Impl, TreeOpsImpl];
P1ImplB: P1 == @BcdScan.mesa!2568653482[Ascii, CharIO, CompilerUtil,
Environment, FileStream, P1, ParseTable, Stream,
Strings, SymbolOps, "-b-cj-ns", CharIOImpl, CompilerUtilImpl,
FileStreamImpl, StreamImpl, StringsImpl, SymbolOpsImpl];
P1ImplC: P1 == @Parser.mesa!2568314581[CharIO, CompilerUtil,
P1, ParseTable, Stream, Strings, "-b-cj-ns", CharIOImpl,
CompilerUtilImpl, P1Impl];
P1Impl: P1 == (P1ImplA) PLUS (P1ImplB) PLUS (P1ImplC);
LET [CompilerUtilImpl: CompilerUtil, ExecOpsImpl2: ExecOps,
TemporarySpecialExecOpsImpl: TemporarySpecialExecOps] == @BcdControl.mesa!2578849994[
Alloc, BcdBindDefs, BcdComData, BcdControlDefs, BcdDefs,
BcdErrorDefs, BcdFileDefs, BcdLiterals, BcdParseData,
BcdUtilDefs, CharIO, CommandUtil, CompilerUtil, ExecOps,
Feedback, File, FileStream, Heap, LongString, OSMiscOps,
P1, Runtime, Stream, Strings, Symbols, SymbolOps, SymbolTable,
TemporarySpecialExecOps, Time, Tree, TreeOps, UserTerminal,
"-b-cj-ns", AllocImpl, BcdControlDefsImpl, BcdErrorDefsImpl,
BcdFileDefsImpl, BcdLiteralsImpl, BcdParseDataImpl, BcdUtilDefsImpl,
CharIOImpl, CommandUtilImpl, ExecOpsImpl, FileStreamImpl,
HeapImpl, OSMiscOpsImpl, P1Impl, RuntimeImpl, StreamImpl,
LongStringImpl, StringsImpl, SymbolOpsImpl, SymbolTableImpl,
TimeImpl, TreeOpsImpl, UserTerminalImpl, BcdComDataImpl];
ExecOpsImpl: ExecOps == (ExecOpsImpl2) THEN (ExecOpsImpl1);
TestB: CONTROL == @TestBinderImpl.mesa!2570551093[Exec, ExecOps,
Heap, "-b-cj-ns", ExecImpl, ExecOpsImpl, HeapImpl];
BcdControlDefsImpl1: BcdControlDefs == @BcdSEBuild.mesa!2578345847[
Alloc, BcdComData, BcdControlDefs, BcdDefs, CommandUtil,
Symbols, SymbolOps, BcdUtilDefs, Strings, Table,
Tree, TreeOps, "-b-cj-ns", AllocImpl, BcdUtilDefsImpl,
CommandUtilImpl, StringsImpl, SymbolOpsImpl, TreeOpsImpl,
BcdComDataImpl];
BcdControlDefsImpl2: BcdControlDefs == @BcdLoad.mesa!2578430622[
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 == @BcdBind.mesa!2578430339[
Alloc, BcdBindDefs, BcdComData, BcdControlDefs,
BcdDefs, BcdErrorDefs, BcdOps, BcdUtilDefs, Strings,
Symbols, SymbolOps, Table, Tree, TreeOps, "-b-cj-ns",
AllocImpl, BcdErrorDefsImpl, BcdUtilDefsImpl, SymbolOpsImpl,
TreeOpsImpl, BcdComDataImpl];
BcdControlDefsImpl4: BcdControlDefs == @BcdWrite.mesa!2578329768[
Alloc, BcdComData, BcdControlDefs, BcdDefs, BcdErrorDefs,
BcdLiterals, BcdOps, BcdUtilDefs, Environment, File,
FileSegment, FileStream, ExecOps, Inline, OSMiscOps,
Space, Stream, Strings, Symbols, SymbolOps, Table,
Tree, TreeOps, "-b-cj-ns", AllocImpl, BcdErrorDefsImpl,
BcdLiteralsImpl, BcdUtilDefsImpl, ExecOpsImpl, FileImpl,
FileStreamImpl, InlineImpl, OSMiscOpsImpl, SpaceImpl,
StreamImpl, StringsImpl, SymbolOpsImpl, TreeOpsImpl,
BcdComDataImpl];
LET [BcdParseData: TYPE, BcdParseDataImpl: BcdParseData] == @BcdParseData.bcd;
BcdControlDefsImpl5: BcdControlDefs == @BcdDebug.mesa!2578347490[
Alloc, BcdBindDefs, BcdComData, BcdControlDefs,
BcdDefs, BcdOps, CharIO, Strings, Symbols, SymbolOps,
Table, Time, Tree, TreeOps, "-b-cj-ns", AllocImpl,
CharIOImpl, SymbolOpsImpl, TimeImpl, TreeOpsImpl,
BcdComDataImpl];
BcdErrorDefsImpl1: BcdErrorDefs == @BcdSymbolPack.mesa!2578853021[
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!2578325732[
Alloc, BcdComData, BcdControlDefs, BcdDefs, BcdErrorDefs,
BcdOps, CharIO, FileStream, Stream, Strings, Symbols,
SymbolOps, Table, "-b-cj-ns", AllocImpl, BcdErrorDefsImpl,
CharIOImpl, FileStreamImpl, StreamImpl, SymbolOpsImpl,
BcdComDataImpl];
BcdErrorDefsImpl: BcdErrorDefs == (BcdErrorDefsImpl1) PLUS (BcdErrorDefsImpl2);
BcdControlDefsImpl: BcdControlDefs == (BcdControlDefsImpl1) PLUS
(BcdControlDefsImpl2) PLUS (BcdControlDefsImpl3) PLUS
(BcdControlDefsImpl4) PLUS (BcdControlDefsImpl5)
]