From c6e97182cfa05d9fb473dfe5f4623f76f6ca745a Mon Sep 17 00:00:00 2001 From: George Bosilca Date: Fri, 15 Apr 2005 21:22:46 +0000 Subject: [PATCH] Dont go back from the progress if there are still events. This commit was SVN r5401. --- src/mca/ptl/gm/src/ptl_gm_component.c | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/src/mca/ptl/gm/src/ptl_gm_component.c b/src/mca/ptl/gm/src/ptl_gm_component.c index 2a30ba2a33..13a6e48b02 100644 --- a/src/mca/ptl/gm/src/ptl_gm_component.c +++ b/src/mca/ptl/gm/src/ptl_gm_component.c @@ -582,13 +582,16 @@ mca_ptl_gm_component_progress (mca_ptl_tstamp_t tstamp) gm_recv_event_t *event; mca_ptl_gm_module_t *ptl; - for( i = 0; i < mca_ptl_gm_component.gm_num_ptl_modules; i++) { + for( i = 0; i < mca_ptl_gm_component.gm_num_ptl_modules;) { ptl = mca_ptl_gm_component.gm_ptl_modules[i]; event = gm_receive(ptl->gm_port); /* If there are no receive events just skip the function call */ if( GM_NO_RECV_EVENT != gm_ntohc(event->recv.type) ) { mca_ptl_gm_analyze_recv_event( ptl, event ); + /* we try to empty the GM event queue */ + continue; } + i++; } return OMPI_SUCCESS; }