Index: dbEvent.c
===================================================================
RCS file: /net/phoebus/epicsmgr/cvsroot/epics/base/src/db/dbEvent.c,v
retrieving revision 1.47.4.9
retrieving revision 1.47.4.8
diff -u -r1.47.4.9 -r1.47.4.8
--- dbEvent.c	12 Jul 2002 22:17:10 -0000	1.47.4.8
+++ dbEvent.c	28 Jan 2003 17:56:15 -0000	1.47.4.9
@@ -444,15 +444,12 @@
      * would be possible.
      */
     for (   getix = pevent->ev_que->getix; 
+            pevent->ev_que->evque[getix] != EVENTQEMPTY; ) {
-            pevent->ev_que->evque[getix] != EVENTQEMPTY; 
-            getix = RNGINC ( getix ) ) {
         if ( pevent->ev_que->evque[getix] == pevent ) {
             assert ( pevent->ev_que->nCanceled < USHRT_MAX );
             pevent->ev_que->nCanceled++;
             event_remove ( pevent->ev_que, getix, &canceledEvent );
+        }
+        getix = RNGINC ( getix );
+        if ( getix == pevent->ev_que->getix ) {
+            break;
         }
     }
     assert ( pevent->npend == 0u );