haikuprojects/befpc
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Quick fix for fpc 1.0.8

Browse Source
This commit is contained in:
ocoursiere
2003-12-18 23:07:21 +00:00
parent 870e215aff
commit 0974b9520e
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
bepascal/source/bepascal/pas/src/be/kernel/os.pp
View File

@@ -697,7 +697,7 @@ end;
{$ifndef _KERNEL_MODE} {$ifndef _KERNEL_MODE}
function _kfind_thread_(const name : PChar) : thread_id; cdecl; external 'root' name '_kfind_thread_'; function _kfind_thread_(const name : PChar) : thread_id; cdecl; external 'root' name '_kfind_thread_';
{$inline ON} {$asmmode intel} {$inline ON} {$asmmode intel}
function find_thread(const name : PChar) : thread_id; inline; function find_thread(const name : PChar) : thread_id; // inline; for 1.9 only ?
begin begin
Result := 0; Result := 0;
if (name = nil) then if (name = nil) then