-- 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