From 5e2938c4b90fba10a6d67cc070be7ca76945928c Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.b@gmx.com>
Date: Wed, 30 Nov 2016 10:28:21 +0100
Subject: [PATCH] #97, bring IDE to front on breakpoint

---
 src/ce_gdb.pas | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/src/ce_gdb.pas b/src/ce_gdb.pas
index c80e399b..6b8c03da 100644
--- a/src/ce_gdb.pas
+++ b/src/ce_gdb.pas
@@ -1812,6 +1812,7 @@ begin
         setState(gsPaused);
         autoGetStuff;
         readOutput;
+        application.BringToFront;
         subjDebugBreak(fSubj, fLastFilename, line, brkreason);
       end;
     end
@@ -1882,6 +1883,7 @@ begin
       or (reason = 'exited')
     then
     begin
+      application.BringToFront;
       readOutput;
       if not fOptions.showGdbOutput then
         fMsg.message('debugging terminated: ' + reason, nil, amcMisc, amkInf);
@@ -2347,7 +2349,7 @@ begin
 end;
 
 
-//TODO-cGDB: copy from call stack list
+//TODO-cGDB: copy from the lists: value, instructions, etc.
 
 procedure TCEGdbWidget.setGpr(reg: TCpuRegister; val: TCpuGprValue);
 const