Browse Source

Merged revisions 1653 via svnmerge from
http://svn.freepascal.org/svn/fpc/trunk

........
r1653 | florian | 2005-11-05 10:54:44 +0100 (Sa, 05 Nov 2005) | 2 lines

* reverted r1651

........

git-svn-id: branches/fixes_2_0@1654 -

florian 20 years ago
parent
commit
827dc7506c
3 changed files with 3 additions and 3 deletions
  1. 1 1
      rtl/inc/threadh.inc
  2. 1 1
      rtl/netware/tthread.inc
  3. 1 1
      rtl/win32/tthread.inc

+ 1 - 1
rtl/inc/threadh.inc

@@ -26,7 +26,7 @@ const
 type
   PEventState = pointer;
   PRTLEvent   = pointer;   // Windows=thandle, other=pointer to record.
-  TThreadFunc = function(parameter : pointer) : ptrint; stdcall;
+  TThreadFunc = function(parameter : pointer) : ptrint;
   trtlmethod  = procedure of object;
 
   // Function prototypes for TThreadManager Record.

+ 1 - 1
rtl/netware/tthread.inc

@@ -126,7 +126,7 @@ end;
 
 
 { TThread }
-function ThreadProc(args:pointer): Integer; cdecl;
+function ThreadProc(args:pointer): Integer;
 var
   FreeThread: Boolean;
   Thread : TThread absolute args;

+ 1 - 1
rtl/win32/tthread.inc

@@ -97,7 +97,7 @@ end;
 
 { TThread }
 
-function ThreadProc(ThreadObjPtr: Pointer): Integer; stdcall;
+function ThreadProc(ThreadObjPtr: Pointer): Integer;
 var
   FreeThread: Boolean;
   Thread: TThread absolute ThreadObjPtr;