1
1

minor cleanup to getenv_pmi.c.

This commit was SVN r25449.
Этот коммит содержится в:
Samuel Gutierrez 2011-11-07 03:18:07 +00:00
родитель 8962ce25b0
Коммит 3ea59cce96

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

@ -18,14 +18,12 @@
int main(int argc, char **argv, char **envp) int main(int argc, char **argv, char **envp)
{ {
int i;
int pmi_rank = -1; int pmi_rank = -1;
int pmi_process_group_size = -1; int pmi_process_group_size = -1;
int num_local_procs = 0; int num_local_procs = 0;
int *local_rank_ids = NULL; int *local_rank_ids = NULL;
int spawned = PMI_FALSE; int spawned = PMI_FALSE;
int rc = EXIT_FAILURE; int rc = EXIT_SUCCESS;
pid_t pid = 0;
char *err = NULL; char *err = NULL;
PMI_BOOL pmi_initialized = PMI_FALSE; PMI_BOOL pmi_initialized = PMI_FALSE;
@ -66,8 +64,6 @@ int main(int argc, char **argv, char **envp)
} }
} }
rc = EXIT_SUCCESS;
done: done:
if (PMI_TRUE == pmi_initialized) { if (PMI_TRUE == pmi_initialized) {
if (PMI_SUCCESS != PMI_Finalize()) { if (PMI_SUCCESS != PMI_Finalize()) {
@ -76,6 +72,7 @@ done:
} }
if (NULL != err) { if (NULL != err) {
fprintf(stderr, "=== ERROR [rank:%d] %s\n", pmi_rank, err); fprintf(stderr, "=== ERROR [rank:%d] %s\n", pmi_rank, err);
rc = EXIT_FAILURE;
} }
return rc; return rc;
} }