paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-11-20 03:50:36 +01:00
Code Issues Packages Projects Releases Wiki Activity

+ call to DoneThread was missing

Browse Source
This commit is contained in:
armin 2002-03-31 10:03:13 +00:00
parent 68d1a3adcc
commit 30f9a9416b
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
rtl/win32/thread.inc
View File

@ -166,6 +166,7 @@ function ThreadMain(param : pointer) : dword;stdcall;
writeln('Jumping to thread function');
{$endif DEBUG_MT}
ThreadMain:=ti.f(ti.p);
DoneThread;
end;
@ -249,7 +250,10 @@ procedure LeaveCriticalSection(var cs : TRTLCriticalSection);
{
$Log$
Revision 1.7 2002-03-28 16:31:35 armin
Revision 1.8 2002-03-31 10:03:13 armin
+ call to DoneThread was missing
Revision 1.7 2002/03/28 16:31:35 armin
+ initialize threadvars defined local in units
Revision 1.6 2001/10/23 21:51:03 peter