mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-14 17:29:33 +02:00
* properly initialize phdr and phnum
git-svn-id: trunk@40448 -
This commit is contained in:
parent
e8a8046d3e
commit
31ae109a31
@ -525,6 +525,8 @@ procedure InitTLS; [public,alias:'FPC_INITTLS'];
|
|||||||
while assigned(auxp^) do
|
while assigned(auxp^) do
|
||||||
inc(auxp);
|
inc(auxp);
|
||||||
inc(auxp);
|
inc(auxp);
|
||||||
|
phdr:=nil;
|
||||||
|
phnum:=0;
|
||||||
{ now we are at the auxillary vector }
|
{ now we are at the auxillary vector }
|
||||||
while assigned(auxp^) do
|
while assigned(auxp^) do
|
||||||
begin
|
begin
|
||||||
|
Loading…
Reference in New Issue
Block a user