Waiting longer for a callstack

Source commit: d3c58050aad80f06db6df73642f6c38f1b11e6d2

source/packages/jcl/JclDebug.pas

@@ -5246,8 +5246,10 @@ begin
   Strings.BeginUpdate;
   try
     for I := 0 to Count - 1 do
+    begin
       Strings.Add(GetLocationInfoStr(Items[I].CallerAddr, IncludeModuleName, IncludeAddressOffset,
         IncludeStartProcLineOffset, IncludeVAddress));
+    end;
   finally
     Strings.EndUpdate;
   end;

source/windows/ConsoleRunner.cpp

@@ -2603,7 +2603,7 @@ int __fastcall DumpCallstack(TConsole * Console, TProgramParams * Params)
 
     ConsolePrintLine(Console, FORMAT(L"Requested callstack dump for process %d...", (ProcessId)));
 
-    int Timeout = 10;
+    int Timeout = 30;
     while (!FileExists(FileName))
     {
       Sleep(1000);