Merge pull request #6796 from orivej/fix-tcp_component_close-segfault

Fix oob_tcp tcp_component_close segfault with active listeners

orte/mca/oob/tcp/oob_tcp_component.c

@@ -186,9 +186,6 @@ static int tcp_component_open(void)
  */
 static int tcp_component_close(void)
 {
-    /* cleanup listen event list */
-    OPAL_LIST_DESTRUCT(&mca_oob_tcp_component.listeners);
-
     OBJ_DESTRUCT(&mca_oob_tcp_component.peers);
 
     if (NULL != mca_oob_tcp_component.ipv4conns) {
@@ -710,6 +707,9 @@ static void component_shutdown(void)
                                                  (void **) &peer, node, &node);
     }
 
+    /* cleanup listen event list */
+    OPAL_LIST_DESTRUCT(&mca_oob_tcp_component.listeners);
+
     opal_output_verbose(2, orte_oob_base_framework.framework_output,
                         "%s TCP SHUTDOWN done",
                         ORTE_NAME_PRINT(ORTE_PROC_MY_NAME));