rtl: fixed TDicttionary with proc type

This commit is contained in:
mattias 2021-01-10 22:14:03 +00:00
parent b0997aea42
commit a87efb9bd5

View File

@ -1409,7 +1409,7 @@ end;
function TDictionary<TKey, TValue>.TPairEnumerator.GetCurrent: TMyPair;
begin
Result:=DoGetCurrent;
Result:=DoGetCurrent();
end;
function TDictionary<TKey, TValue>.TPairEnumerator.DoGetCurrent: TMyPair;
@ -1442,7 +1442,7 @@ end;
function TDictionary<TKey, TValue>.TKeyEnumerator.GetCurrent: TKey;
begin
Result:=DoGetCurrent;
Result:=DoGetCurrent();
end;
function TDictionary<TKey, TValue>.TKeyEnumerator.DoGetCurrent: TKey;
@ -1475,7 +1475,7 @@ end;
function TDictionary<TKey, TValue>.TValueEnumerator.GetCurrent: TValue;
begin
Result:=DoGetCurrent;
Result:=DoGetCurrent();
end;
function TDictionary<TKey, TValue>.TValueEnumerator.DoGetCurrent: TValue;
@ -1966,7 +1966,7 @@ end;
function TCustomInvertedListEnumerator<T>.GetCurrent: T;
begin
Result:=DoGetCurrent;
Result:=DoGetCurrent();
end;
constructor TCustomInvertedListEnumerator<T>.Create(AList: TCustomList<T>);