#include "wx/app.h"
#include "wx/list.h"
+#ifdef __VMS__
+#pragma message disable nosimpint
+#endif
#include <Xm/Xm.h>
+#ifdef __VMS__
+#pragma message enable nosimpint
+#endif
#include "wx/motif/private.h"
-#if !USE_SHARED_LIBRARY
IMPLEMENT_ABSTRACT_CLASS(wxTimer, wxObject)
-#endif
static wxList wxTimerList(wxKEY_INTEGER);
return; // Avoid to process spurious timer events
if (!timer->m_oneShot)
- timer->m_id = XtAppAddTimeOut ((XtAppContext) wxTheApp->GetAppContext(), timer->m_milli,
- (XtTimerCallbackProc) wxTimerCallback, (XtPointer) timer);
+ timer->m_id = XtAppAddTimeOut((XtAppContext) wxTheApp->GetAppContext(),
+ timer->m_milli,
+ (XtTimerCallbackProc) wxTimerCallback,
+ (XtPointer) timer);
else
timer->m_id = 0;
- timer->Notify ();
+
+ timer->Notify();
}
wxTimer::wxTimer()
{
m_id = 0;
- m_milli = 0 ;
- m_id = 0;
- m_oneShot = FALSE;
}
wxTimer::~wxTimer()
{
- Stop();
+ wxTimer::Stop();
+ wxTimerList.DeleteObject(this);
}
bool wxTimer::Start(int milliseconds, bool mode)
{
Stop();
- m_oneShot = mode;
- if (milliseconds < 0)
- milliseconds = m_lastMilli;
-
- if (milliseconds <= 0)
- return FALSE;
-
- m_lastMilli = m_milli = milliseconds;
+ (void)wxTimerBase::Start(milliseconds, mode);
if (!wxTimerList.Find((long)this))
wxTimerList.Append((long)this, this);
- m_id = XtAppAddTimeOut ((XtAppContext) wxTheApp->GetAppContext(), milliseconds,
- (XtTimerCallbackProc) wxTimerCallback, (XtPointer) this);
+ m_id = XtAppAddTimeOut((XtAppContext) wxTheApp->GetAppContext(),
+ m_milli,
+ (XtTimerCallbackProc) wxTimerCallback,
+ (XtPointer) this);
return TRUE;
}