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

* small v1_0 fix

Browse Source
This commit is contained in:
marco 2003-09-20 14:51:42 +00:00
parent 60a7f85960
commit 5241d352b1
1 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
fcl/freebsd/thread.inc
View File

@ -171,7 +171,7 @@ begin
Thread.DoTerminate;
if FreeThread then
Thread.Free;
fpExit(Result);
{$ifdef ver1_0}ExitProcess{$else}fpExit{$endif}(Result);
end;
@ -253,7 +253,7 @@ begin
Linux.Setpriority
{$else}
Unix.fpSetPriority
{$endif} (Prio_Process,FHandle, Priorities[Value]);
{$endif} (Prio_Process,FHandle, Priorities[Value]);
end;
@ -316,7 +316,10 @@ end;
{
$Log$
Revision 1.10 2003-09-20 12:38:29 marco
Revision 1.11 2003-09-20 14:51:42 marco
* small v1_0 fix
Revision 1.10 2003/09/20 12:38:29 marco
* FCL now compiles for FreeBSD with new 1.1. Now Linux.
Revision 1.9 2003/01/17 19:01:07 marco