File [ivy]<Satterthwaite>Models>Lister.model!1

    -- Lister.model
    -- Copyright (c) 1986 by Xerox Corporation.  All rights reserved.
    -- last edit by Satterthwaite, May 30, 1986 12:11:52 pm PDT

    LET @///SML/OSBasics.modelBcd!581021414 IN
    LET @///SML/CedarBasics.modelBcd!581021540 IN
    LET @///SML/LoaderBasics.modelBcd!581021616 IN
    LET [
        CommandTool: TYPE~@/Cedar/Cedar6.1/CommandTool/CommandTool.bcd!546422614,
        ConvertUnsafe: TYPE~@/Cedar/Cedar6.1/Rope/ConvertUnsafe.bcd!541570785,
        DefaultRemoteNames: TYPE~
          @/Cedar/Cedar6.1/UserCredentials/DefaultRemoteNames.bcd!541581120,
        FSBackdoor: TYPE~@/Cedar/Cedar6.1/FS/FSBackdoor.bcd!542939149,
        RopeFile: TYPE~@/Cedar/Cedar6.1/BasicPackages/RopeFile.bcd!541589206,
        RuntimeError: TYPE~@/Cedar/Cedar6.1/MesaRuntime/RuntimeError.bcd!541570482,
        SymbolPack: TYPE~
          @/Cedar/Cedar6.1/BcdStuff/SymbolPack.bcd!541573280*[
            ConvertUnsafeImpl:~NIL, PrincOpsUtilsImpl:~NIL],
        SymbolTable: TYPE~@/Cedar/Cedar6.1/BcdStuff/SymbolTable.bcd!541573286,
        TiogaAccess: TYPE~@/Cedar/Cedar6.1/Tioga/TiogaAccess.bcd!546419529] IN

    LAMBDA [
        AtomImpl: Atom,
        BasicsImpl: Basics,
        BasicTimeImpl: BasicTime,
        CommanderImpl: Commander,
        CommandToolImpl: CommandTool,
        ConvertUnsafeImpl: ConvertUnsafe,
        DefaultRemoteNamesImpl: DefaultRemoteNames,
        FSImpl: FS,
        FSBackdoorImpl: FSBackdoor,
        IOImpl: IO,
        IOUtilsImpl: IOUtils,
        ListImpl: List,
        RopeImpl: Rope,
        RopeFileImpl: RopeFile,
        RuntimeErrorImpl: RuntimeError,
        SymbolPackImpl: SymbolPack,
        SymbolTableImpl: SymbolTable,
        TiogaAccessImpl: TiogaAccess,
        VMImpl: VM] IN

      REC [

        &options: STRING~"j-s";

        BcdDefs: TYPE~@/Cedar/Cedar6.1/BasicLoadState/BcdDefs.bcd!541573150;
        --FileSegment: TYPE~@/Cedar/Cedar6.1/BcdStuff/FileSegment.bcd!541573263;

        Symbols: TYPE~@/Cedar/Cedar6.1/BcdStuff/Symbols.bcd!541573249;
        Literals: TYPE~@/Cedar/Cedar6.1/BcdStuff/Literals.bcd!541573252;
        Tree: TYPE~@/Cedar/Cedar6.1/BcdStuff/Tree.bcd!541573254;
        SymbolSegment: TYPE~@/Cedar/Cedar6.1/BcdStuff/SymbolSegment.bcd!541573259;

        RCMap: TYPE~@/Cedar/Cedar6.1/BcdStuff/RCMap.bcd!541573243;
        RTBcd: TYPE~@/Cedar/Cedar6.1/BcdStuff/RTBcd.bcd!541573289;
        TypeStrings: TYPE~@/Cedar/Cedar6.1/BcdStuff/TypeStrings.bcd!541573291;

        ListerUtils: TYPE~@ListerUtils.mesa!574047025*[];
        ListerUtilsImpl: ListerUtils~@ListerUtilsImpl.mesa!577310929*[]*[];

        CodeLister: TYPE~@CodeLister.mesa!573788165*[];
        CodeListerImpl: CodeLister~@CodeListerImpl.mesa!577310959*[]*[];

        BcdLister: TYPE~@BcdLister.mesa!573787065*[];
        BcdListerImpl: BcdLister~@BcdListerImpl.mesa!577310984*[]*[];

        ListRTBcd: TYPE~@ListRTBcd.mesa!573787097*[];
        ListRTBcdImpl: ListRTBcd~@ListRTBcdImpl.mesa!577311006*[]*[];

        SortedSymbolLister: TYPE~@SortedSymbolLister.mesa!574105571*[];
        SortedSymbolListerImpl: SortedSymbolLister~
          @SortedSymbolListerImpl.mesa!577312115*[]*[];

        Lister: CONTROL~@KLister.mesa!577311394*[]*[];
        BcdCompare: CONTROL~@BcdCompare.mesa!577312177*[]*[];

        UnparserBuffer: TYPE~
          @/Cedar/CedarChest6.1/StructuredStreams/UnparserBuffer.bcd!571566341;
        StructuredStreams: TYPE~
          @/Cedar/CedarChest6.1/StructuredStreams/StructuredStreams.bcd!571566351;
        [
        UnparserBufferImpl: UnparserBuffer,
        StructuredStreamsImpl: StructuredStreams]~
          @/Cedar/CedarChest6.1/StructuredStreams/StructuredStreamsPackage.bcd!572834221*
          []].ListerUtilsImpl