Fix a few miscelaneous memory leaks.
This commit was SVN r24865.
Этот коммит содержится в:
родитель
a5062385c2
Коммит
b2b781e537
@ -153,6 +153,7 @@ int ompi_comm_cid_init (void)
|
||||
return ret;
|
||||
}
|
||||
}
|
||||
free(procs);
|
||||
|
||||
return OMPI_SUCCESS;
|
||||
}
|
||||
|
@ -143,6 +143,7 @@ int mca_coll_sm_init_query(bool enable_progress_threads,
|
||||
if (size <= 1) {
|
||||
opal_output_verbose(10, mca_coll_base_output,
|
||||
"coll:sm:init_query: comm size too small; disqualifying myself");
|
||||
free(procs);
|
||||
return OMPI_ERR_NOT_AVAILABLE;
|
||||
}
|
||||
for (i = 0; i < size; ++i) {
|
||||
@ -152,12 +153,12 @@ int mca_coll_sm_init_query(bool enable_progress_threads,
|
||||
break;
|
||||
}
|
||||
}
|
||||
free(procs);
|
||||
if (i >= size) {
|
||||
opal_output_verbose(10, mca_coll_base_output,
|
||||
"coll:sm:init_query: no other local procs; disqualifying myself");
|
||||
return OMPI_ERR_NOT_AVAILABLE;
|
||||
}
|
||||
free(procs);
|
||||
|
||||
/* Don't do much here because we don't really want to allocate any
|
||||
shared memory until this component is selected to be used. */
|
||||
|
@ -162,6 +162,7 @@ static int mca_pml_bfo_component_close(void)
|
||||
if (NULL != mca_pml_bfo.allocator_name) {
|
||||
free(mca_pml_bfo.allocator_name);
|
||||
}
|
||||
opal_output_close(mca_pml_bfo_output);
|
||||
|
||||
return OMPI_SUCCESS;
|
||||
}
|
||||
|
@ -161,6 +161,7 @@ static int mca_pml_csum_component_close(void)
|
||||
if (NULL != mca_pml_csum.allocator_name) {
|
||||
free(mca_pml_csum.allocator_name);
|
||||
}
|
||||
opal_output_close(mca_pml_csum_output);
|
||||
|
||||
return OMPI_SUCCESS;
|
||||
}
|
||||
|
@ -158,6 +158,7 @@ static int mca_pml_ob1_component_close(void)
|
||||
if (NULL != mca_pml_ob1.allocator_name) {
|
||||
free(mca_pml_ob1.allocator_name);
|
||||
}
|
||||
opal_output_close(mca_pml_ob1_output);
|
||||
|
||||
return OMPI_SUCCESS;
|
||||
}
|
||||
|
@ -77,6 +77,7 @@ static int mca_pml_v_component_open(void)
|
||||
false, false, "", &vprotocol_include_list);
|
||||
|
||||
pml_v_output_open(output, verbose);
|
||||
free(output);
|
||||
|
||||
if(-1 != priority)
|
||||
V_OUTPUT_ERR("pml_v: Overriding priority setting (%d) with -1. The PML V should NEVER be the selected component; even when enabling fault tolerance.", priority);
|
||||
|
@ -98,6 +98,7 @@ opal_shmem_base_runtime_query(mca_base_module_t **best_module,
|
||||
env_hint_name = mca_base_param_environ_variable("shmem_RUNTIME_QUERY_hint",
|
||||
NULL, NULL);
|
||||
env_hint_val = getenv(env_hint_name);
|
||||
free(env_hint_name);
|
||||
|
||||
/* traverse the list of available components.
|
||||
* for each call their 'run-time query' functions to determine relative
|
||||
|
Загрузка…
x
Ссылка в новой задаче
Block a user