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.
Этот коммит содержится в:
родитель
e1764bbdf9
Коммит
efa74f7bfe
@ -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 */
|
||||||
|
Загрузка…
x
Ссылка в новой задаче
Block a user