paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-14 21:49:32 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Fixed memory allocation in registration

Browse Source 
git-svn-id: trunk@16163 -
This commit is contained in:
michael 2010-10-15 07:46:08 +00:00
parent d3bdf2577c
commit 38aacec93d
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
packages/fcl-extra/src/win/daemonapp.inc
View File

@ -385,7 +385,7 @@ Var
RV : Integer; RV : Integer;
begin begin
GetMem(P,SizeOf(TServiceTableEntry)*FMapper.DaemonDefs.Count+1); GetMem(P,SizeOf(TServiceTableEntry)*(FMapper.DaemonDefs.Count+1));
Try Try
C:=FMapper.DaemonDefs.Count; C:=FMapper.DaemonDefs.Count;
For I:=0 to C-1 do For I:=0 to C-1 do