anchor.diff:    THproseClassManager.Register<TArrayList, IList>('!List');
     THproseClassManager.Register<TArrayList, IArrayList>('!ArrayList');
     THproseClassManager.Register<THashedList, IHashedList>('!HashedList');
  +  THproseClassManager.Register<TCaseInsensitiveArrayList, ICaseInsensitiveArrayList>('!CaseInsensitiveArrayList');
     THproseClassManager.Register<TCaseInsensitiveHashedList, ICaseInsensitiveHashedList>('!CaseInsensitiveHashedList');
     THproseClassManager.Register<THashMap, IMap>('!Map');
     THproseClassManager.Register<THashMap, IHashMap>('!HashMap');
  
positive.code:     procedure Put(const ConstArray: array of const); overload;
      function Add(const AKey, AValue: Variant): Boolean;
      procedure Clear;
      function ContainsKey(const AKey: Variant): Boolean;
      function ContainsValue(const AValue: Variant): Boolean;
      function Delete(const AKey: Variant): Variant;
  
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;
  