#include "xtx.h"

void XtX_MainLoop(f,d)
XtXFunc f;
VOIDP   d;
{
  VOIDP app;   
  XEvent event;
  
  app=(VOIDP)_XtDefaultAppContext();
  do  {
    XtAppNextEvent(app, &event);
    XtDispatchEvent(&event);
  }
  while ((f(d))!=Bool_TRUE);
}