while (1) {
    DoOneEvent(DONT_WAIT);
    # do your own (short) action
    select undef,undef,undef,0.0001;
  }