paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-08 15:41:12 +02:00
Code Issues Packages Projects Releases Wiki Activity

Debugger: fixed wrong timeout detection on Mac during startup

Browse Source 
git-svn-id: trunk@44054 -
This commit is contained in:
martin 2014-02-13 17:48:07 +00:00
parent 854e950d9c
commit e01e690857
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
debugger/gdbmidebugger.pp
View File

@ -4859,6 +4859,7 @@ function TGDBMIDebuggerCommandStartDebugging.DoExecute: Boolean;
end;
// RUN
DefaultTimeOut := 0;
if not ExecuteCommand(Cmd, R, [cfTryAsync])
then begin
SetDebuggerErrorState(Format(gdbmiCommandStartMainRunError, [LineEnding]),
@ -4893,6 +4894,7 @@ function TGDBMIDebuggerCommandStartDebugging.DoExecute: Boolean;
rval := rval + s;
DefaultTimeOut := DebuggerProperties.TimeoutForEval; // Getting address for breakpoints may need timeout
BrkErr := ParseBreakInsertError(s, i);
if not BrkErr
then break;
@ -5115,6 +5117,7 @@ begin
"main" could map to more than one location, so we try entry point first
*)
RunToMain(EntryPoint);
DefaultTimeOut := DebuggerProperties.TimeoutForEval; // Getting address for breakpoints may need timeout
if DebuggerState = dsStop
then begin