From 0807b46fe74c4ed0c93380f31194f67efc3a0ff8 Mon Sep 17 00:00:00 2001 From: martin Date: Wed, 25 Jan 2012 13:33:16 +0000 Subject: [PATCH] DBG: defer setting some of the internal breakpoints (exception/run-error) git-svn-id: trunk@34921 - --- debugger/gdbmidebugger.pp | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/debugger/gdbmidebugger.pp b/debugger/gdbmidebugger.pp index 23be8ef014..b96a270a4f 100644 --- a/debugger/gdbmidebugger.pp +++ b/debugger/gdbmidebugger.pp @@ -3987,11 +3987,6 @@ begin FTheDebugger.FMainAddrBreak.Clear(Self); - // they may still exist from prev run, addr will be checked - FTheDebugger.FExceptionBreak.SetAddr(Self); - FTheDebugger.FBreakErrorBreak.SetAddr(Self); - FTheDebugger.FRunErrorBreak.SetAddr(Self); - // try to find PID (if not already found) if (TargetInfo^.TargetPID = 0) and ExecuteCommand('info program', [], R, [cfCheckState]) @@ -4030,6 +4025,11 @@ begin DebugLn('[Debugger] Target PID: %u', [TargetInfo^.TargetPID]); + // they may still exist from prev run, addr will be checked + FTheDebugger.FExceptionBreak.SetAddr(Self); + FTheDebugger.FBreakErrorBreak.SetAddr(Self); + FTheDebugger.FRunErrorBreak.SetAddr(Self); + if R.State = dsNone then begin SetDebuggerState(dsInit); // triggers all breakpoints to be set.