-#if defined(__WXDEBUG__)
- // check if event classes implement Clone() correctly
- // NOTE: the check is done against _all_ event classes which are linked to
- // the executable currently running, which are not necessarily all
- // wxWidgets event classes.
- const wxClassInfo *ci = wxClassInfo::GetFirst();
- for (; ci; ci = ci->GetNext())
- {
- // is this class derived from wxEvent?
- if (!ci->IsKindOf(CLASSINFO(wxEvent)) || wxString(ci->GetClassName()) == "wxEvent")
- continue;
-
- if (!ci->IsDynamic())
- {
- wxLogWarning("The event class '%s' should have a DECLARE_DYNAMIC_CLASS macro!",
- ci->GetClassName());
- continue;
- }
-
- // yes; test if it implements Clone() correctly
- wxEvent* test = wxDynamicCast(ci->CreateObject(),wxEvent);
- if (test == NULL)
- {
- wxLogWarning("The event class '%s' should have a DECLARE_DYNAMIC_CLASS macro!",
- ci->GetClassName());
- continue;
- }
-
- wxEvent* cloned = test->Clone();
- if (!cloned || cloned->GetClassInfo() != ci)
- wxLogWarning("The event class '%s' does not correctly implement Clone()!",
- ci->GetClassName());
-
- delete cloned;
- delete test;
- }
-#endif
-