restored code to disable event processing during cleanup

This commit was SVN r3068.

src/mca/ptl/base/ptl_base_close.c

@@ -7,6 +7,7 @@
 #include <stdio.h>
 
 #include "include/constants.h"
+#include "event/event.h"
 #include "mca/mca.h"
 #include "mca/base/base.h"
 #include "mca/ptl/ptl.h"
@@ -18,6 +19,9 @@ int mca_ptl_base_close(void)
   ompi_list_item_t *item;
   mca_ptl_base_selected_module_t *sm;
 
+  /* disable event processing while cleaning up ptls */
+  ompi_event_disable();
+
   /* Finalize all the ptl components and free their list items */
 
   for (item = ompi_list_remove_first(&mca_ptl_base_modules_initialized);
@@ -47,6 +51,9 @@ int mca_ptl_base_close(void)
   if(NULL != mca_ptl_base_exclude)
      free(mca_ptl_base_exclude);
 
+  /* restore event processing */
+  ompi_event_enable();
+
   /* All done */
   return OMPI_SUCCESS;
 }