* GetCurrentThreadHandle renamed to GetCurrentThreadId

rtl/inc/threadh.inc

@@ -52,7 +52,7 @@ function  KillThread (threadHandle : dword) : dword;
 function  WaitForThreadTerminate (threadHandle : dword; TimeoutMs : longint) : dword;  {0=no timeout}
 function  ThreadSetPriority (threadHandle : dword; Prio: longint): boolean;            {-15..+15, 0=normal}
 function  ThreadGetPriority (threadHandle : dword): Integer;
-function  GetCurrentThreadHandle : dword;
+function  GetCurrentThreadId : dword;
 
 
 { this allows to do a lot of things in MT safe way }
@@ -65,7 +65,10 @@ procedure LeaveCriticalsection(var cs : TRTLCriticalSection);
 
 {
   $Log$
-  Revision 1.10  2003-03-27 17:14:27  armin
+  Revision 1.11  2003-10-01 21:00:09  peter
+    * GetCurrentThreadHandle renamed to GetCurrentThreadId
+
+  Revision 1.10  2003/03/27 17:14:27  armin
   * more platform independent thread routines, needs to be implemented for unix
 
   Revision 1.9  2002/10/16 19:04:27  michael

rtl/netware/systhrds.pp

@@ -269,9 +269,9 @@ end;
 
 function GetThreadID : dword; cdecl; external 'clib' name 'GetThreadID';
 
-function  GetCurrentThreadHandle : dword;
+function  GetCurrentThreadId : dword;
 begin
-  GetCurrentThreadHandle := GetThreadID;
+  GetCurrentThreadId := GetThreadID;
 end;
 
 
@@ -454,7 +454,10 @@ end.
 
 {
   $Log$
-  Revision 1.2  2003-03-27 17:14:27  armin
+  Revision 1.3  2003-10-01 21:00:09  peter
+    * GetCurrentThreadHandle renamed to GetCurrentThreadId
+
+  Revision 1.2  2003/03/27 17:14:27  armin
   * more platform independent thread routines, needs to be implemented for unix
 
   Revision 1.1  2003/02/16 17:12:15  armin

rtl/unix/systhrds.pp

@@ -302,9 +302,9 @@ CONST
       {$Warning ThreadGetPriority needs to be implemented}
     end;
 
-    function  GetCurrentThreadHandle : dword;
+    function  GetCurrentThreadId : dword;
     begin
-      GetCurrentThreadHandle:=dword(pthread_self);
+      GetCurrentThreadId:=dword(pthread_self);
     end;
 
 
@@ -385,7 +385,10 @@ initialization
 end.
 {
   $Log$
-  Revision 1.14  2003-10-01 20:53:08  peter
+  Revision 1.15  2003-10-01 21:00:09  peter
+    * GetCurrentThreadHandle renamed to GetCurrentThreadId
+
+  Revision 1.14  2003/10/01 20:53:08  peter
     * GetCurrentThreadId implemented
 
   Revision 1.13  2003/09/20 12:38:29  marco

rtl/win32/systhrds.pp

@@ -81,7 +81,7 @@ function  GetLastError : dword; stdcall;external 'kernel32' name 'GetLastError';
 function  WaitForSingleObject (hHandle,Milliseconds: dword): dword; stdcall;external 'kernel32' name 'WaitForSingleObject';
 function  WinThreadSetPriority (threadHandle : dword; Prio: longint): boolean; stdcall;external 'kernel32' name 'SetThreadPriority';
 function  WinThreadGetPriority (threadHandle : dword): Integer; stdcall;external 'kernel32' name 'GetThreadPriority';
-function  WinGetCurrentThreadHandle : dword; stdcall;external 'kernel32' name 'GetCurrentThread';
+function  WinGetCurrentThreadId : dword; stdcall;external 'kernel32' name 'GetCurrentThread';
 
 {*****************************************************************************
                              Threadvar support
@@ -264,9 +264,9 @@ function  WinGetCurrentThreadHandle : dword; stdcall;external 'kernel32' name 'G
     end;
 
 
-    function  GetCurrentThreadHandle : dword;
+    function  GetCurrentThreadId : dword;
     begin
-      GetCurrentThreadHandle:=WinGetCurrentThreadHandle;
+      GetCurrentThreadId:=WinGetCurrentThreadId;
     end;
 
 {*****************************************************************************
@@ -355,7 +355,10 @@ initialization
 end.
 {
   $Log$
-  Revision 1.5  2003-09-17 15:06:36  peter
+  Revision 1.6  2003-10-01 21:00:09  peter
+    * GetCurrentThreadHandle renamed to GetCurrentThreadId
+
+  Revision 1.5  2003/09/17 15:06:36  peter
     * stdcall patch
 
   Revision 1.4  2003/03/27 17:14:27  armin