--- Merging r33346 into '.':

U    rtl/win/tthread.inc
--- Recording mergeinfo for merge of r33346 into '.':
 U   .

# revisions: 33346

git-svn-id: branches/fixes_3_0@33815 -

rtl/win/tthread.inc

@@ -7,7 +7,7 @@ begin
   FInitialSuspended := CreateSuspended;
   { Always start in suspended state, will be resumed in AfterConstruction if necessary
     See Mantis #16884 }
-  FHandle := BeginThread(nil, StackSize, @ThreadProc, pointer(self), CREATE_SUSPENDED,
+  FHandle := BeginThread(nil, StackSize, @ThreadProc, pointer(self), CREATE_SUSPENDED OR STACK_SIZE_PARAM_IS_A_RESERVATION,
                          FThreadID);
   if FHandle = TThreadID(0) then
     raise EThread.CreateFmt(SThreadCreateError, [SysErrorMessage(getlasterror)]);