paweld/pas2js
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/pas2js.git synced 2025-08-12 16:09:04 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Fix uninitialized result warnings

Browse Source
This commit is contained in:
michael 2021-02-16 09:08:59 +00:00
parent 67dc093559
commit d19e385f71
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
packages/rtl/generics.collections.pas
View File

@ -1300,6 +1300,7 @@ end;
function TDictionary<TKey, TValue>.ExtractPair(const Key: TKey): TMyPair; function TDictionary<TKey, TValue>.ExtractPair(const Key: TKey): TMyPair;
begin begin
Result:=Default(TMyPair);
if FMap.Has(Key) then if FMap.Has(Key) then
begin begin
Result.Create(Key,TValue(FMap.get(key))); Result.Create(Key,TValue(FMap.get(key)));
@ -1419,6 +1420,7 @@ Var
begin begin
A:=TJSValueDynArray(FVal.Value); A:=TJSValueDynArray(FVal.Value);
Result:=Default(TMyPair);
Result.Create(TKey(A[0]),TValue(A[1])); Result.Create(TKey(A[0]),TValue(A[1]));
end; end;