paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-03 01:10:22 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed threadproc decl

Browse Source
This commit is contained in:
peter 1999-10-27 10:40:30 +00:00
parent 1f89d3f981
commit c266a730af
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
fcl/linux/thread.inc
View File

@ -132,9 +132,10 @@ end;
{ TThread }
function ThreadProc(Thread: TThread): Integer;cdecl;
function ThreadProc(args:pointer): Integer;cdecl;
var
FreeThread: Boolean;
Thread : TThread absolute args;
begin
Thread.Execute;
FreeThread := Thread.FFreeOnTerminate;
@ -272,7 +273,10 @@ end;
{
$Log$
Revision 1.4 1999-08-28 09:32:26 peter
Revision 1.5 1999-10-27 10:40:30 peter
* fixed threadproc decl
Revision 1.4 1999/08/28 09:32:26 peter
* readded header/log
Revision 1.2 1999/05/31 12:47:59 peter