anchor.diff:        ReadWriteSync: Boolean = False): IList; override;
       function ToArrayList(Sync: Boolean = True;
         ReadWriteSync: Boolean = False): IArrayList; override;
  +    procedure Sort; overload; override;
  +    procedure Sort(CompareProc: TMapCompareMethod); overload; override;
  +    procedure SortByValue; override;
       procedure TrimExcess; override;
     end;
   
  
positive.code:   THproseClassManager.Register<TArrayList, IList>('!List');
    THproseClassManager.Register<TArrayList, IArrayList>('!ArrayList');
    THproseClassManager.Register<THashedList, IHashedList>('!HashedList');
    THproseClassManager.Register<TCaseInsensitiveHashedList, ICaseInsensitiveHashedList>('!CaseInsensitiveHashedList');
    THproseClassManager.Register<THashMap, IMap>('!Map');
    THproseClassManager.Register<THashMap, IHashMap>('!HashMap');
  
negative.code:     procedure Move(CurIndex, NewIndex: Integer); override;
    end;
  
    ICaseInsensitiveArrayList = interface(IArrayList)
      ['{DAF8EA96-E2CC-F49C-8617-D999CA8A2EB3}']
    end;
  
    { TCaseInsensitiveArrayList }
  
    TCaseInsensitiveArrayList = class(TArrayList, ICaseInsensitiveArrayList)
    protected
      function Compare(const Value1, Value2: Variant): Integer; override;
      function IndexCompare(Index: Integer; const Value: Variant):
        Boolean; override;
    end;
  
    ICaseInsensitiveHashedList = interface(IHashedList)
    ['{9ECA15EC-9486-4BF6-AADD-BBD88890FAF8}']
    end;
  