diff options
Diffstat (limited to 'rtl/inc/systemh.inc')
-rw-r--r-- | rtl/inc/systemh.inc | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/rtl/inc/systemh.inc b/rtl/inc/systemh.inc index da1817c863..14300f603a 100644 --- a/rtl/inc/systemh.inc +++ b/rtl/inc/systemh.inc @@ -367,11 +367,8 @@ var var cmdline:Pchar=nil; {$endif} -type - TRTLThread = type Pointer; - ThreadVar - ThreadID : TRTLThread; +// ThreadID : TRTLThread; { Standard In- and Output } ErrOutput, Output, @@ -707,7 +704,7 @@ Function Sptr:Pointer;{$ifdef SYSTEMINLINE}inline;{$endif}[internconst:fpc_in_co {$ifdef FPC_HAS_FEATURE_PROCESSES} Function GetProcessID:SizeUInt; -Function GetThreadID:TRTLThread;{$ifdef SYSTEMINLINE}inline;{$endif} +//Function GetThreadID:TRTLThread;{$ifdef SYSTEMINLINE}inline;{$endif} {$endif FPC_HAS_FEATURE_PROCESSES} function InterLockedIncrement (var Target: longint) : longint; public name 'FPC_INTERLOCKEDINCREMENT'; |