[KERNEL32]
authorTimo Kreuzer <timo.kreuzer@reactos.org>
Thu, 4 Nov 2010 10:16:14 +0000 (10:16 +0000)
committerTimo Kreuzer <timo.kreuzer@reactos.org>
Thu, 4 Nov 2010 10:16:14 +0000 (10:16 +0000)
Print delphi exception with the Exception code 0xeedfade, we were previously only checking for 0xeedface, maybe an older value.

svn path=/trunk/; revision=49464

reactos/dll/win32/kernel32/except/except.c

index d46a51c..d57bd7a 100644 (file)
@@ -413,7 +413,7 @@ RaiseException(IN DWORD dwExceptionCode,
         }
     }
 
-    if (dwExceptionCode == 0xeedface)
+    if (dwExceptionCode == 0xeedface || dwExceptionCode == 0xeedfade)
     {
         DPRINT1("Delphi Exception at address: %p\n", ExceptionRecord.ExceptionInformation[0]);
         DPRINT1("Exception-Object: %p\n", ExceptionRecord.ExceptionInformation[1]);