1
1

The label name "ERROR" is defined as a flag in Visual Studio platformSDK. Using "ERROR" as a label causes conflicts. Changing it into lowercase will solve the problem.

This commit was SVN r14869.
Этот коммит содержится в:
Shiqing Fan 2007-06-05 14:32:27 +00:00
родитель e1764bbdf9
Коммит efa74f7bfe
2 изменённых файлов: 4 добавлений и 4 удалений

Просмотреть файл

@ -93,7 +93,7 @@ int MPI_Comm_spawn(char *command, char **argv, int maxprocs, MPI_Info info,
ompi_open_port (port_name); ompi_open_port (port_name);
if (OMPI_SUCCESS != (rc = ompi_comm_start_processes (1, &command, &argv, &maxprocs, if (OMPI_SUCCESS != (rc = ompi_comm_start_processes (1, &command, &argv, &maxprocs,
&info, port_name))) { &info, port_name))) {
goto ERROR; goto error;
} }
tmp_port = ompi_parse_port (port_name, &tag); tmp_port = ompi_parse_port (port_name, &tag);
free(tmp_port); free(tmp_port);
@ -102,7 +102,7 @@ int MPI_Comm_spawn(char *command, char **argv, int maxprocs, MPI_Info info,
rc = ompi_comm_connect_accept (comm, root, NULL, send_first, &newcomp, tag); rc = ompi_comm_connect_accept (comm, root, NULL, send_first, &newcomp, tag);
ERROR: error:
/* close the port again. Nothing has to be done for that at the moment.*/ /* close the port again. Nothing has to be done for that at the moment.*/
/* set error codes */ /* set error codes */

Просмотреть файл

@ -110,7 +110,7 @@ int MPI_Comm_spawn_multiple(int count, char **array_of_commands, char ***array_o
if (OMPI_SUCCESS != (rc = ompi_comm_start_processes(count, array_of_commands, if (OMPI_SUCCESS != (rc = ompi_comm_start_processes(count, array_of_commands,
array_of_argv, array_of_maxprocs, array_of_argv, array_of_maxprocs,
array_of_info, port_name))) { array_of_info, port_name))) {
goto ERROR; goto error;
} }
tmp_port = ompi_parse_port (port_name, &tag); tmp_port = ompi_parse_port (port_name, &tag);
free(tmp_port); free(tmp_port);
@ -118,7 +118,7 @@ int MPI_Comm_spawn_multiple(int count, char **array_of_commands, char ***array_o
rc = ompi_comm_connect_accept (comm, root, NULL, send_first, &newcomp, tag); rc = ompi_comm_connect_accept (comm, root, NULL, send_first, &newcomp, tag);
ERROR: error:
/* close the port again. Nothing has to be done for that at the moment.*/ /* close the port again. Nothing has to be done for that at the moment.*/
/* set array of errorcodes */ /* set array of errorcodes */