paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-19 13:59:29 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Merging revisions 42979 from trunk:

Browse Source 
------------------------------------------------------------------------
    r42979 | michael | 2019-09-13 18:20:59 +0200 (Fri, 13 Sep 2019) | 1 line
    
    * Fix uninitialized var warning
    ------------------------------------------------------------------------

git-svn-id: branches/fixes_3_2@43256 -
This commit is contained in:
michael 2019-10-19 14:46:59 +00:00
parent 9acb68ee32
commit b1347be8f7
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
packages/fcl-web/src/base/fphttpclient.pp
View File

@ -433,6 +433,7 @@ var
begin
l := Length(S);
if l=0 then exit;
Result:='';
SetLength(Result, l);
P:=PChar(Result);
i:=1;