From e148ae89014f86dad668d522898efc07d64022c0 Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.burg@gmx.com>
Date: Fri, 2 Oct 2015 07:00:35 +0200
Subject: [PATCH] #42, support for allthe throwables

---
 src/ce_gdb.pas | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/src/ce_gdb.pas b/src/ce_gdb.pas
index 761b5af4..af029cb7 100644
--- a/src/ce_gdb.pas
+++ b/src/ce_gdb.pas
@@ -37,7 +37,7 @@ type
     fDocHandler: ICEMultiDocHandler;
     fMsg: ICEMessagesDisplay;
     fGdb: TCEProcess;
-    fRegs: array[TCpuRegs] of UIntPtr;
+    fRegs: array[TCpuRegs] of UInt64;
     //
     procedure startDebugging;
     procedure killGdb;
@@ -228,7 +228,8 @@ begin
     str := 'break ' + fFileLineBrks.Strings[i] + ':' + intToStr(PtrUInt(fFileLineBrks.Objects[i])) + #10;
     fGdb.Input.Write(str[1], length(str));
   end;
-  // break on druntime exceptions, does not work with 'throw new ...'
+  // break on druntime exceptions heper + throw'
+  fGdb.OnReadData := @processSilently;
   gdbCommand('break onAssertError');
   gdbCommand('break onAssertErrorMsg');
   gdbCommand('break onUnittestErrorMsg');
@@ -239,9 +240,8 @@ begin
   gdbCommand('break onInvalidMemoryOperationError');
   gdbCommand('break onSwitchError');
   gdbCommand('break onUnicodeError');
-  //
-
-
+  gdbCommand('break _d_throwc');
+  fGdb.OnReadData := @gdbOutput;
   // launch
   gdbCommand('run');
 end;