-- GL.model, 10-May-83 12:23:16 PDT OPEN @BasicPilot.model!2579461154; KernelFile: TYPE~@KernelFile.bcd; ProcessorFace: TYPE~@ProcessorFace.bcd; Strings: TYPE~@LongStrings.mesa!2579451954[LongString]; System: TYPE~@System.bcd; GL: 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!2585844909[Format, Stream, Strings]; CommandUtil: TYPE~@CommandUtil.mesa!2585845958[ExecOps, Stream, Strings]; Table: TYPE~@Table.mesa!2577115106; Alloc: TYPE~@Alloc.mesa!2585849506; BcdDefs: TYPE~@BcdDefs.mesa!2565550795[PrincOps, Table, TimeStamp]; BcdOps: TYPE~@BcdOps.mesa!2563405009[BcdDefs]; Symbols: TYPE~@Symbols.mesa!2591895789[PrincOps, Table, TimeStamp]; Literals: TYPE~@Literals.mesa!2591823743[Symbols, Table]; Tree: TYPE~@Tree.mesa!2591824100[Table, Literals, Symbols]; SymbolSegment: TYPE~@SymbolSegment.mesa!2591823663[Literals, Symbols, Table, TimeStamp, Tree]; SymbolOps: TYPE~@SymbolOps.mesa!2591827562[Alloc, Strings, Symbols, TimeStamp, Tree]; SymbolTable: TYPE~@SymbolTable.mesa!2568557625[FileSegment, SymbolPack]; FileSegment: TYPE~@FileSegment.mesa!2550689766[File]; OSMiscOps: TYPE~@OSMiscOps.mesa!2585846758[Environment, File, Strings, TimeStamp]; 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]; 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]; LET [SymbolPack: TYPE, SymbolPackImpl: SymbolPack, SymbolOpsImpl: SymbolOps] ~ @SymbolPack.mesa!2591827548[ Inline, Literals, Strings, Symbols, SymbolOps, SymbolSegment, TimeStamp, Tree, "-b-cj-ns", InlineImpl, StringsImpl]; SymbolTableImpl: SymbolTable~@SymbolCache.mesa!2591914617[Environment, File, FileSegment, Heap, Space, Symbols, SymbolPack, SymbolSegment, SymbolTable, "-b-cj-ns", SymbolPackImpl, FileImpl, HeapImpl, SpaceImpl]; ListerUtil: TYPE~@ListerUtil.mesa!2599055087[BcdDefs, BcdOps, FileSegment, Space, Stream, Strings, Symbols, SymbolTable]; LET [AllocImpl: Alloc, ListerUtilImpl: ListerUtil] ~ @ListerUtilities.mesa!2599068633[ 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!2581441556[Strings]; ListerOpsImpl: ListerOps~@GLList.mesa!2598895391[BcdDefs, BcdOps, CharIO, FileSegment, ListerOps, ListerUtil, PrincOps, Space, Stream, Strings, Symbols, SymbolTable, "-b-cj-ns", CharIOImpl, ListerUtilImpl, SpaceImpl, StreamImpl, StringsImpl, SymbolTableImpl]; GLControl: CONTROL~@GLControl.mesa!2588192417[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] ]