paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-12-16 04:30:35 +01:00
Code Issues Packages Projects Releases Wiki Activity

* the BeginThread() variant that allowed you to specify the stacksize

Browse Source 
still passed DefaultStackSize to the OS-specific routines
This commit is contained in:
Jonas Maebe 2002-11-14 12:40:06 +00:00
parent 5c5fc48e2c
commit 4b2838b161
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
rtl/inc/thread.inc
View File

@ -41,7 +41,7 @@
ThreadFunction : tthreadfunc;p : pointer;creationFlags : dword;
var ThreadId : Longint) : DWord;
begin
BeginThread:=BeginThread(nil,DefaultStackSize,ThreadFunction,p,creationFlags,Dword(THreadId));
BeginThread:=BeginThread(nil,StackSize,ThreadFunction,p,creationFlags,Dword(THreadId));
end;
@ -81,7 +81,11 @@
{
$Log$
Revision 1.2 2002-10-16 19:04:27 michael
Revision 1.3 2002-11-14 12:40:06 jonas
* the BeginThread() variant that allowed you to specify the stacksize
still passed DefaultStackSize to the OS-specific routines
Revision 1.2 2002/10/16 19:04:27 michael
+ More system-independent thread routines
Revision 1.1 2002/10/14 19:39:17 peter