51   IHashList<TKey, TValue> = interface(IDictionary<TKey, TValue>)
79   THashList<TKey, TValue> = class(TANTLRObject, IHashList<TKey, TValue>)
82       TPairEnumerator = class(TEnumerator<TPair<TKey, TValue>>)
84         FHashList: THashList<TKey, TValue>;
88         FPair: TPair<TKey, TValue>;
89         function GetCurrent: TPair<TKey, TValue>;  in GetCurrent()
91         function DoGetCurrent: TPair<TKey, TValue>; override;  in DoGetCurrent()
94         constructor Create(const AHashList: THashList<TKey, TValue>);  argument
96         property Current: TPair<TKey, TValue> read GetCurrent;
99     FDictionary: IDictionary<TKey, TValue>;
104     function GetItem(const Key: TKey): TValue;  in GetItem()
105     procedure SetItem(const Key: TKey; const Value: TValue);  argument
108     procedure Add(const Key: TKey; const Value: TValue);  argument
112     function TryGetValue(const Key: TKey; out Value: TValue): Boolean;  in TryGetValue()  argument
113     procedure AddOrSetValue(const Key: TKey; const Value: TValue);  argument
115     function ContainsValue(const Value: TValue): Boolean;  in ContainsValue()  argument
119     function GetEnumerator: TEnumerator<TPair<TKey, TValue>>;  in GetEnumerator()
121     property Items[const Key: TKey]: TValue read GetItem write SetItem; default;
168 procedure THashList<TKey, TValue>.Add(const Key: TKey; const Value: TValue);  argument
175 procedure THashList<TKey, TValue>.AddOrSetValue(const Key: TKey;
176   const Value: TValue);
184 procedure THashList<TKey, TValue>.Clear;
191 function THashList<TKey, TValue>.ContainsKey(const Key: TKey): Boolean;  in THashList()
196 function THashList<TKey, TValue>.ContainsValue(const Value: TValue): Boolean;  in THashList()  argument
201 constructor THashList<TKey, TValue>.Create;
206 constructor THashList<TKey, TValue>.Create(const ACapacity: Integer);
211     FDictionary := TDictionary<TKey, TValue>.Create;
216     FDictionary := TDictionary<TKey, TValue>.Create(ACapacity);
222 function THashList<TKey, TValue>.GetCount: Integer;  in THashList()
227 function THashList<TKey, TValue>.GetEnumerator: TEnumerator<TPair<TKey, TValue>>;  in THashList()
232 function THashList<TKey, TValue>.GetItem(const Key: TKey): TValue;  in GetItem()
237 procedure THashList<TKey, TValue>.Remove(const Key: TKey);
244 procedure THashList<TKey, TValue>.SetItem(const Key: TKey; const Value: TValue);  argument
255 procedure THashList<TKey, TValue>.TrimExcess;
261 function THashList<TKey, TValue>.TryGetValue(const Key: TKey;  in THashList()
262   out Value: TValue): Boolean;
269 constructor THashList<TKey, TValue>.TPairEnumerator.Create(
270   const AHashList: THashList<TKey, TValue>);
278 function THashList<TKey, TValue>.TPairEnumerator.DoGetCurrent: TPair<TKey, TValue>;  in THashList()
283 function THashList<TKey, TValue>.TPairEnumerator.DoMoveNext: Boolean;  in THashList()
288 function THashList<TKey, TValue>.TPairEnumerator.GetCurrent: TPair<TKey, TValue>;  in THashList()
293 function THashList<TKey, TValue>.TPairEnumerator.MoveNext: Boolean;  in THashList()
307     FPair.Value := Default(TValue);