fixing some minor issues in connect/accept. A connect/accept between two groups of processes (within the same MPI_COMM_WORLD) works already

This commit was SVN r2743.

src/mpi/c/comm_accept.c

@@ -74,8 +74,10 @@ int MPI_Comm_accept(char *port_name, MPI_Info info, int root,
      * Our own port_name is not of interest here, so we pass in NULL.
      * The two leaders will figure this out later. However, we need the tag.
      */
+    if ( rank == root ) {
 	tmp_port = ompi_parse_port(port_name, &tag);
 	free (tmp_port);
+    }
     rc = ompi_comm_connect_accept (comm, root, NULL, send_first, &newcomp, tag);
 
     *newcomm = newcomp;

src/mpi/c/comm_connect.c

@@ -76,6 +76,7 @@ int MPI_Comm_connect(char *port_name, MPI_Info info, int root,
      * translate the port_name string into the according process_name_t 
      * structure. 
      */ 
+    if ( rank == root ) { 
 	tmp_port = ompi_parse_port (port_name, &tag);
 	port_proc_name = ompi_name_server.convert_string_to_process_name(tmp_port);
 	if ( NULL == port_proc_name ) {
@@ -83,6 +84,7 @@ int MPI_Comm_connect(char *port_name, MPI_Info info, int root,
 	    return OMPI_ERRHANDLER_INVOKE(comm, MPI_ERR_PORT, FUNC_NAME);
 	}
 	free (tmp_port);
+    }
 
     rc = ompi_comm_connect_accept (comm, root, port_proc_name, send_first,
                                    &newcomp, tag);