[royce] 20215: print out some useful info before we go belly-up

print out some useful info before we go belly-up
Modified: trunk/reactos/subsys/win32k/ntuser/class.c
  _____  

Modified: trunk/reactos/subsys/win32k/ntuser/class.c
--- trunk/reactos/subsys/win32k/ntuser/class.c	2005-12-16 23:17:18 UTC
(rev 20214)
+++ trunk/reactos/subsys/win32k/ntuser/class.c	2005-12-17 05:47:19 UTC
(rev 20215)
@@ -66,6 +66,16 @@

 
 VOID FASTCALL DestroyClass(PWNDCLASS_OBJECT Class)
 {
+#if defined(DBG) || defined(KDBG)
+   if ( Class->refs != 0 )
+   {
+      WCHAR AtomName[256];
+      ULONG AtomNameLen = sizeof(AtomName);
+      RtlQueryAtomInAtomTable ( gAtomTable, Class->Atom,
+         NULL, NULL, AtomName, &AtomNameLen );
+      DPRINT1("DestroyClass(): can't delete class = '%ws', b/c refs =
%lu\n", AtomName, Class->refs );
+   }
+#endif
    ASSERT(Class->refs == 0);
    
    RemoveEntryList(&Class->ListEntry);