paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2026-01-06 02:50:44 +01:00
Code Issues Packages Projects Releases Wiki Activity

* always allocate argument even if its empty (bugfix web bug #2202)

Browse Source
This commit is contained in:
carl 2002-10-31 15:17:58 +00:00
parent 1d3e450412
commit 002a5e009a
1 changed files with 7 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
rtl/win32/system.pp
View File

@ -696,8 +696,9 @@ var
sysreallocmem(argv,argvlen*sizeof(pointer));
end;
{ use realloc to reuse already existing memory }
if len<>0 then
sysreallocmem(argv[idx],len+1);
{ always allocate, even if length is zero, since }
{ the arg. is still present! }
sysreallocmem(argv[idx],len+1);
end;
begin
@ -1498,7 +1499,10 @@ end.
{
$Log$
Revision 1.35 2002-10-14 20:40:22 florian
Revision 1.36 2002-10-31 15:17:58 carl
* always allocate argument even if its empty (bugfix web bug 2202)
Revision 1.35 2002/10/14 20:40:22 florian
* InitFPU renamed to SysResetFPU
Revision 1.34 2002/10/14 19:39:17 peter