From ff436a13fca62c562b411099ca933b055760b705 Mon Sep 17 00:00:00 2001
From: Sylvain Petreolle <spetreolle@yahoo.fr>
Date: Fri, 25 Jan 2008 21:38:43 +0000
Subject: [PATCH] display exception text as well

svn path=/trunk/; revision=32006
---
 reactos/dll/win32/kernel32/except/except.c | 1 +
 1 file changed, 1 insertion(+)

diff --git a/reactos/dll/win32/kernel32/except/except.c b/reactos/dll/win32/kernel32/except/except.c
index c866ef2d252..94409847a00 100644
--- a/reactos/dll/win32/kernel32/except/except.c
+++ b/reactos/dll/win32/kernel32/except/except.c
@@ -395,6 +395,7 @@ RaiseException(IN DWORD dwExceptionCode,
     {
         DPRINT1("Delphi Exception at address: %p\n", ExceptionRecord.ExceptionInformation[0]);
         DPRINT1("Exception-Object: %p\n", ExceptionRecord.ExceptionInformation[1]);
+        DPRINT1("Exception text: %s\n", ExceptionRecord.ExceptionInformation[2]);        
     }
 
     /* Raise the exception */