-- CrossPackager.Model, 12-Jan-83 11:53:33 PST OPEN @TrinityPilot.model!2586712235; CatchFormat: TYPE~@CatchFormat.mesa!2573406132[PrincOps]; CIFS: TYPE~@CIFS.bcd; ConvertUnsafe: TYPE~@ConvertUnsafe.bcd; Rope: TYPE~@Rope.bcd; ProcessorFace: TYPE~@ProcessorFace.bcd; String: TYPE~@DummyString.mesa!2586451369[LongString]; Strings: TYPE~@LongStrings.mesa!2579451954[LongString]; System: TYPE~@System.bcd; CrossPackager: PROC [CIFSImpl: CIFS, ConvertUnsafeImpl: ConvertUnsafe, ExecImpl: Exec, ExecOpsImpl: ExecOps, FileImpl: File, FileStreamImpl: FileStream, HeapImpl: Heap, InlineImpl: Inline, LongStringImpl: LongString, ProcessorFaceImpl: ProcessorFace, RopeImpl: Rope, RuntimeImpl: Runtime, SpaceImpl: Space, StreamImpl: Stream, StringImpl: String, StringsImpl: Strings, TimeImpl: Time, TransactionImpl: Transaction, VolumeImpl: Volume] RETURNS [] [ Table: TYPE~@Table.mesa!2577115106; BcdDefs: TYPE~@tempBcdDefs.mesa!2582065272[PrincOps, Table, TimeStamp]; BcdOps: TYPE~@BcdOps.mesa!2563405009[BcdDefs]; BcdOpsImpl: BcdOps~@tempBcdOperations.mesa!2586985716[BcdDefs, BcdOps, "-b-cj-ns"]; Alloc: TYPE~@Alloc.mesa!2585849506; AllocImpl: Alloc~@AllocImpl.mesa!2585851003[Alloc, Environment, File, FileTypes, Heap, Inline, Runtime, Space, Volume, "-b-cj-ns", FileImpl, HeapImpl, InlineImpl, RuntimeImpl, SpaceImpl, VolumeImpl]; CompilerSymbols: TYPE Symbols~@Symbols.mesa!2585582399[PrincOps, Table, TimeStamp]; CompilerLiterals: TYPE Literals~@Literals.mesa!2588521531[CompilerSymbols, Table]; CompilerTree: TYPE Tree~@Tree.mesa!2588520688[Table, CompilerLiterals, CompilerSymbols]; SymbolOps: TYPE~@SymbolOps.mesa!2588606814[Alloc, Strings, CompilerSymbols, TimeStamp, CompilerTree]; SymbolSegment: TYPE~@SymbolSegment.mesa!2548600256[CompilerLiterals, CompilerSymbols, Table, TimeStamp, CompilerTree]; PackageSymbols: TYPE~@tPackageSymbols.mesa!2550983696[PrincOps, CompilerSymbols, SymbolSegment, Table]; FileSegment: TYPE~@FileSegment.mesa!2550689766[File]; LET [SymbolPack: TYPE, SymbolPackImpl: SymbolPack, SymbolOpsImpl: SymbolOps] ~ @SymbolPack.mesa!2583969220[ Inline, CompilerLiterals, Strings, CompilerSymbols, SymbolOps, SymbolSegment, TimeStamp, CompilerTree, "-b-cj-ns", InlineImpl, StringsImpl]; SymbolTable: TYPE~@SymbolTable.mesa!2568557625[FileSegment, SymbolPack]; HashTypes: TYPE~@ProtoHashTypes.mesa!2587495537[Table]; LET [BcdSymbols: TYPE Symbols, BcdLiterals: TYPE Literals] ~ @BcdSymbols.mesa!2588531818[ BcdDefs, HashTypes, Table]; HashOps: TYPE~@ProtoHashOps.mesa!2586886101[Alloc, HashTypes, Strings]; BcdTree: TYPE Tree~@BcdTree.mesa!2588531927[BcdDefs, BcdLiterals, BcdSymbols, Table]; BcdErrorDefs: TYPE~@BcdErrorDefs.mesa!2584374417[BcdDefs, BcdOps, BcdSymbols, Strings]; BcdHashOpsImpl: 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, BcdSymbols, Strings, Table, BcdTree]; BcdUtilDefsImpl: BcdUtilDefs~@tempBcdUtilities.mesa!2586894475[ Alloc, BcdDefs, BcdErrorDefs, BcdUtilDefs, HashOps, Inline, Strings, BcdSymbols, Table, BcdTree, "-b-cj-ns", AllocImpl, BcdErrorDefsImpl, BcdHashOpsImpl, InlineImpl, StringsImpl]; CharIO: TYPE~@CharIO.mesa!2585844909[Format, Stream, Strings]; CharIOImpl: CharIO~@CharIOImpl.mesa!2585845746[CharIO, Stream, Strings, "-b-cj-ns", StringsImpl, StreamImpl]; CommandUtil: TYPE~@CommandUtil.mesa!2585845958[ExecOps, Stream, Strings]; CommandUtilImpl: CommandUtil~@CommandPack.mesa!2585846832[CommandUtil, Heap, Stream, Strings, "-b-cj-ns", HeapImpl, StreamImpl, StringsImpl]; SourceBcd: TYPE~@SourceBcd.mesa!2587571809[BcdDefs, BcdOps, BcdUtilDefs, HashTypes, String, Table]; LET [PackSymbols: TYPE Symbols, SemanticEntry: TYPE] ~ @SemanticEntry.mesa!2588700377[ BcdDefs, HashTypes, SourceBcd, Table]; CodePackProcs: TYPE~@CodePackProcs.mesa!2587506897[BcdDefs, HashTypes, PackageSymbols, SourceBcd, String, Table]; LET [PackTree: TYPE Tree, PackLiterals: TYPE Literals] ~ @PackTree.mesa!2588701204[ CodePackProcs, HashTypes, PackSymbols, Table]; PackHashOpsImpl: HashOps~@ProtoHashTab.mesa!2587495541[Alloc, BcdOps, Environment, HashOps, HashTypes, Inline, Strings, "-b-cj-ns", AllocImpl, InlineImpl, StringsImpl]; PackTreeOps: TYPE TreeOps~@ProtoTreeOps.mesa!2588520733[Alloc, PackLiterals, PackSymbols, PackTree]; PackTreeOpsImpl: PackTreeOps~@ProtoTreePack.mesa!2588540382[ Alloc, PackLiterals, PackSymbols, PackTree, PackTreeOps, "-b-cj-ns", AllocImpl]; PackagerDefs: TYPE~@PackagerDefs.mesa!2588694789[Alloc, BcdDefs, CIFS, Stream, Table, PackTree]; FileTable: TYPE~@FileTable.mesa!2587310259[BcdDefs, CIFS]; FileTableImpl: FileTable~@FileTableImpl.mesa!2587311809[BcdDefs, CIFS, ConvertUnsafe, Error, FileTable, PackagerDefs, SourceBcd, Space, String, "-b-cj-ns", CIFSImpl, ConvertUnsafeImpl, ErrorImpl, PackagerDefsImpl, SourceBcdImpl, SpaceImpl, StringImpl]; ModuleSymbols: TYPE~@ModuleSymbols.mesa!2587411303[BcdDefs, PackageSymbols, String]; ModuleSymbolsImpl: ModuleSymbols~@ModuleSymbolsImpl.mesa!2587311865[ BcdDefs, CIFS, Environment, Error, FileTable, ModuleSymbols, PackageSymbols, PackagerDefs, PrincOps, SourceBcd, Space, String, SymbolPack, CompilerSymbols, SymbolSegment, SymbolTable, Table, "-b-cj-ns", CIFSImpl, ErrorImpl, FileTableImpl, PackagerDefsImpl, SourceBcdImpl, SpaceImpl, SymbolPackImpl]; PackList: TYPE~@PackList.mesa!2507069223; PackListImpl: PackList~@PackListImpl.mesa!2587492216[Alloc, BcdDefs, CodePackProcs, CharIO, FramePackModules, HashOps, PackagerDefs, PackList, PackageSymbols, SourceBcd, String, Table, Time, PackTree, "-b-cj-ns", AllocImpl, CharIOImpl, PackHashOpsImpl, PackagerDefsImpl, SourceBcdImpl, TimeImpl, CodePackProcsImpl, FramePackModulesImpl]; PieceTable: TYPE~@PieceTable.mesa!2586973919[CIFS, Stream]; PieceTableImpl: PieceTable~@PieceTableImpl.mesa!2587396674[Environment, CIFS, File, FileStream, Inline, Heap, PieceTable, Space, Stream, "-b-cj-ns", CIFSImpl, FileImpl, FileStreamImpl, InlineImpl, HeapImpl, SpaceImpl, StreamImpl]; Error: TYPE~@Error.mesa!2586900941[BcdDefs, SourceBcd, String, HashOps]; ErrorImpl: Error~@ErrorImpl.mesa!2587492334[BcdDefs, CharIO, Error, FileStream, HashOps, PackagerDefs, SourceBcd, Stream, String, Table, Time, "-b-cj-ns", CharIOImpl, FileStreamImpl, PackHashOpsImpl, PackagerDefsImpl, SourceBcdImpl, StreamImpl, TimeImpl]; PackDebug: TYPE~@PackDebug.mesa!2587506143[SourceBcd]; PackDebugImpl: PackDebug~@PackDebugImpl.mesa!2588700683[Alloc, BcdDefs, BcdOps, CodePackProcs, CharIO, HashOps, PackDebug, PackagerDefs, ProcessingOrder, SemanticEntry, SourceBcd, String, Table, Time, PackTree, PackTreeOps, "-b-cj-ns", AllocImpl, CharIOImpl, PackHashOpsImpl, PackagerDefsImpl, SourceBcdImpl, TimeImpl, PackTreeOpsImpl, ProcessingOrderImpl]; PackParseTable: TYPE ParseTable~@PackParseTable.mesa!2588698692; P1: TYPE~@ProtoP1.mesa!2588538983[PackParseTable, Stream, Strings]; LET [PackParseData: TYPE, PackParseDataImpl: PackParseData] ~ @PackParseData.bcd; P1ImplA: P1~@ProtoScanner.mesa!2588538052[Ascii, CharIO, Environment, FileStream, HashOps, P1, PackParseTable, Stream, Strings, "-b-cj-ns", CharIOImpl, FileStreamImpl, PackHashOpsImpl, StreamImpl, StringsImpl]; P1ImplB: P1~@ProtoParser.mesa!2588287864[CharIO, P1, PackParseTable, Stream, Strings, "-b-cj-ns", CharIOImpl, P1Impl]; P1ImplC: P1~@PackTreeBuild.mesa!2588698678[P1, PackParseTable, PackTree, PackTreeOps, "-b-cj-ns", PackTreeOpsImpl]; P1Impl: P1~(P1ImplA) PLUS (P1ImplB) PLUS (P1ImplC); SourceBcdImpl: SourceBcd~@SourceBcdImpl.mesa!2587574288[Alloc, BcdDefs, BcdOps, BcdUtilDefs, CIFS, Error, HashOps, Inline, PackagerDefs, Space, String, SourceBcd, Table, "-b-cj-ns", AllocImpl, CIFSImpl, ErrorImpl, InlineImpl, PackHashOpsImpl, PackagerDefsImpl, SpaceImpl, StringImpl]; SemanticEntryImpl: SemanticEntry~@SemanticEntryImpl.mesa!2587508353[ Alloc, BcdDefs, Error, PackagerDefs, SemanticEntry, SourceBcd, Table, PackTree, PackTreeOps, "-b-cj-ns", AllocImpl, ErrorImpl, PackagerDefsImpl, SourceBcdImpl, PackTreeOpsImpl]; ProcessingOrder: TYPE~@ProcessingOrder.mesa!2524502447[BcdDefs, PackTree]; ProcessingOrderImpl: ProcessingOrder~@ProcessingOrderImpl.mesa!2587571928[ Alloc, BcdDefs, Error, PackagerDefs, ProcessingOrder, SemanticEntry, SourceBcd, Table, PackTree, PackTreeOps, "-b-cj-ns", AllocImpl, ErrorImpl, PackagerDefsImpl, SourceBcdImpl, PackTreeOpsImpl]; CodePackProcsImpl: CodePackProcs~@CodePackProcsImpl.mesa!2588701590[ Alloc, BcdDefs, CodePackProcs, Error, HashOps, Inline, ModuleSymbols, PackagerDefs, PackageSymbols, ProcessingOrder, SemanticEntry, SourceBcd, String, CompilerSymbols, SymbolOps, Table, PackTree, PackTreeOps, "-b-cj-ns", AllocImpl, ErrorImpl, PackHashOpsImpl, InlineImpl, ModuleSymbolsImpl, PackagerDefsImpl, ProcessingOrderImpl, SymbolOpsImpl, SourceBcdImpl, PackTreeOpsImpl]; FramePackModules: TYPE~@FramePackModules.mesa!2578597575[BcdDefs, String, PackTree]; FramePackModulesImpl: FramePackModules~@FramePackModulesImpl.mesa!2587495263[ Alloc, BcdDefs, FramePackModules, HashOps, PackagerDefs, SemanticEntry, SourceBcd, String, Table, PackTree, PackTreeOps, "-b-cj-ns", AllocImpl, PackHashOpsImpl, PackagerDefsImpl, SourceBcdImpl, PackTreeOpsImpl]; PackCode: TYPE~@PackCode.mesa!2587412067[Alloc]; PackCodeImplA: PackCode~@PackCodeImplA.mesa!2587493197[Alloc, BcdDefs, BcdOps, BcdUtilDefs, CatchFormat, CharIO, CIFS, CodePackProcs, Environment, Error, FileStream, FileTable, FramePackModules, HashOps, Inline, ModuleSymbols, Mopcodes, PackagerDefs, PackageSymbols, PackCode, PieceTable, PrincOps, SourceBcd, Stream, String, SymbolOps, CompilerSymbols, Table, Time, PackTree, "-b-cj-ns", AllocImpl, BcdUtilDefsImpl, CharIOImpl, CIFSImpl, CodePackProcsImpl, ErrorImpl, FileStreamImpl, FileTableImpl, FramePackModulesImpl, InlineImpl, ModuleSymbolsImpl, PackagerDefsImpl, PackCodeImpl, PieceTableImpl, SourceBcdImpl, StreamImpl, StringImpl, SymbolOpsImpl, TimeImpl]; PackCodeImplB: PackCode~@PackCodeImplB.mesa!2587486147[Alloc, BcdDefs, BcdOps, BcdUtilDefs, Error, Inline, PackagerDefs, PackCode, SourceBcd, Table, "-b-cj-ns", AllocImpl, BcdOpsImpl, BcdUtilDefsImpl, ErrorImpl, InlineImpl, PackagerDefsImpl, PackCodeImpl, SourceBcdImpl]; LET [BcdErrorDefsImpl: BcdErrorDefs, PackCodeImplC: PackCode] ~ @PackagerBcdTabDriver.mesa!2586902667[ BcdDefs, BcdErrorDefs, HashOps, PackagerDefs, PackCode, "-b-cj-ns", BcdHashOpsImpl, PackagerDefsImpl]; PackCodeImpl: PackCode~(PackCodeImplA) PLUS (PackCodeImplB) PLUS (PackCodeImplC); LET [CrossPack: CONTROL, PackagerDefsImpl: PackagerDefs] ~ @CrossPackControl.mesa!2588703169[ Alloc, BcdDefs, CharIO, CIFS, CodePackProcs, CommandUtil, ConvertUnsafe, Exec, ExecOps, FileStream, HashOps, Heap, Inline, ModuleSymbols, PackagerDefs, PackCode, PackDebug, PackParseData, P1, ProcessingOrder, ProcessorFace, PackList, Rope, Runtime, SemanticEntry, SourceBcd, Stream, Strings, Time, PackTreeOps, "-b-cj-ns", AllocImpl, CharIOImpl, CIFSImpl, CodePackProcsImpl, CommandUtilImpl, ConvertUnsafeImpl, ExecImpl, ExecOpsImpl, FileStreamImpl, PackHashOpsImpl, HeapImpl, InlineImpl, ModuleSymbolsImpl, PackCodeImpl, PackDebugImpl, PackParseDataImpl, P1Impl, ProcessingOrderImpl, ProcessorFaceImpl, PackListImpl, RopeImpl, RuntimeImpl, SemanticEntryImpl, SourceBcdImpl, StreamImpl, StringsImpl, TimeImpl, PackTreeOpsImpl] ]