-- CL.Model, 15-Sep-82 17:47:36 PDT OPEN @BasicPilot.model!2565894086; KernelFile: TYPE == @KernelFile.bcd; Mopcodes: TYPE == @Mopcodes.bcd; ProcessorFace: TYPE == @ProcessorFace.bcd; System: TYPE == @System.bcd; CL: PROC [DirectoryImpl: Directory, ExecImpl: Exec, ExecOpsImpl: 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] RETURNS [] [ CharIO: TYPE == @CharIO.mesa!2557696230[Format, Stream, Strings]; CommandUtil: TYPE == @CommandUtil.mesa!2550530585[ExecOps, Stream, Strings]; Table: TYPE == @Table.mesa!2577115106; Alloc: TYPE == @Alloc.mesa!2548347750; BcdDefs: TYPE == @BcdDefs.mesa!2565550795[PrincOps, Table, TimeStamp]; BcdOps: TYPE == @BcdOps.mesa!2563405009[BcdDefs]; Symbols: TYPE == @Symbols.mesa!2565302638[PrincOps, Table, TimeStamp]; Literals: TYPE == @Literals.mesa!2550173704[Symbols, Table]; Tree: TYPE == @Tree.mesa!2558456374[Table, Literals, Symbols]; SymbolSegment: TYPE == @SymbolSegment.mesa!2548600256[Literals, Symbols, Table, TimeStamp, Tree]; SymbolOps: TYPE == @SymbolOps.mesa!2559578970[Alloc, Strings, Symbols, TimeStamp, Tree]; SymbolTable: TYPE == @SymbolTable.mesa!2568557625[FileSegment, SymbolPack]; FileSegment: TYPE == @FileSegment.mesa!2550689766[File]; FileParms: TYPE == @FileParms.mesa!2563230620[FileSegment, Strings, TimeStamp]; OSMiscOps: TYPE == @OSMiscOps.mesa!2570646172[Environment, File, Strings, TimeStamp]; 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]; 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]; LET [SymbolPack: TYPE, SymbolPackImpl: SymbolPack, SymbolOpsImpl: SymbolOps] == @SymbolPack.mesa!2559578211[ Inline, Literals, Strings, Symbols, SymbolOps, SymbolSegment, TimeStamp, Tree, "-b-cj-ns", InlineImpl, StringsImpl]; SymbolTableImpl: SymbolTable == @SymbolCache.mesa!2568562284[ Environment, File, FileSegment, Heap, Space, Symbols, SymbolPack, SymbolSegment, SymbolTable, "-b-cj-ns", SymbolPackImpl, FileImpl, HeapImpl, SpaceImpl]; ListerUtil: TYPE == @ListerUtil.mesa!2565035516[BcdDefs, BcdOps, FileSegment, Space, Stream, Strings, Symbols, SymbolTable]; LET [discard: Alloc, ListerUtilImpl: ListerUtil] == @ListerUtilities.mesa!2578437396[ Alloc, BcdDefs, BcdOps, CharIO, Environment, Exec, File, FileSegment, FileStream, Format, Heap, ListerUtil, OSMiscOps, Space, Stream, Strings, Symbols, SymbolSegment, SymbolTable, Time, TTY, "-b-cj-ns", CharIOImpl, ExecImpl, FileStreamImpl, HeapImpl, OSMiscOpsImpl, SpaceImpl, StreamImpl, StringsImpl, TimeImpl, TTYImpl]; ListerOps: TYPE == @ListerOps.mesa!2578435929[Strings]; OpTableDefs: TYPE == @OpTableDefs.mesa!2533681377[Environment]; LET [MopcodeNames: TYPE, MopcodeNamesImpl: MopcodeNames] == @MopcodeNames.bcd; ListerOpsImpl: ListerOps == @CLList.mesa!2578437913[BcdDefs, BcdOps, CharIO, Environment, FileSegment, FileStream, Format, Heap, Inline, ListerOps, ListerUtil, Mopcodes, OpTableDefs, OSMiscOps, PrincOps, Space, Stream, Strings, Symbols, SymbolSegment, SymbolTable, "-b-cj-ns", CharIOImpl, FileStreamImpl, HeapImpl, InlineImpl, ListerUtilImpl, OpTableDefsImpl, OSMiscOpsImpl, SpaceImpl, StreamImpl, StringsImpl, SymbolTableImpl]; OpTableDefsImpl1: OpTableDefs == @OpNames.mesa!2539382116[Environment, MopcodeNames, OpTableDefs, Runtime, Strings, "-b-cj-ns", MopcodeNamesImpl, RuntimeImpl, StringsImpl]; OpTableDefsImpl2: OpTableDefs == @OpTable.mesa!2548283498[OpTableDefs, "-b-cj-ns"]; OpTableDefsImpl: OpTableDefs == (OpTableDefsImpl1) PLUS (OpTableDefsImpl2); CLControl: CONTROL == @CLControl.mesa!2578438049[CharIO, CommandUtil, Exec, ExecOps, ListerOps, OSMiscOps, Runtime, Stream, Strings, Time, TTY, "-b-cj-ns", CharIOImpl, CommandUtilImpl, ExecImpl, ExecOpsImpl, ListerOpsImpl, OSMiscOpsImpl, RuntimeImpl, StreamImpl, StringsImpl, TimeImpl, TTYImpl] ]