paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-11-02 01:59:29 +01:00
Code Issues Packages Projects Releases Wiki Activity

FpDebug: test, increase timeout to reduce false failures

Browse Source 
git-svn-id: trunk@61965 -
This commit is contained in:
martin 2019-10-03 18:38:06 +00:00
parent cf8b7f94fe
commit 50cb78378e
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/lazdebuggers/lazdebuggerfp/test/teststepping.pas
View File

@ -161,7 +161,9 @@ begin
AssertDebuggerState(dsPause);
TestLocation('At BrkThreadCreateInStep', 'BrkThreadCreateInStep', -1);
Debugger.RunToNextPause(dcStepOver);
// This test can take longer, as the new thread gets very little scheduler time
// during the single stepping of the main thread.
Debugger.RunToNextPause(dcStepOver, 25000);
AssertDebuggerState(dsPause);
TestLocation('At AfterThreadCreateInStep', 'AfterThreadCreateInStep', -1);
TestEquals('ThreadId AfterThreadCreateInStep', ThreadIdMain, dbg.Threads.CurrentThreads.CurrentThreadId);