display exception text as well

svn path=/trunk/; revision=32006
This commit is contained in:
Sylvain Petreolle 2008-01-25 21:38:43 +00:00
parent 8acf5e8480
commit ff436a13fc

View file

@ -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 */