1
1

fix MCA variable and component system leaks

cmr=v1.7.3:reviewer=rhc

This commit was SVN r29011.
This commit is contained in:
Nathan Hjelm 2013-08-09 19:50:28 +00:00
parent 47320713bb
commit 841ed962f6
4 changed files with 9 additions and 2 deletions

View File

@ -193,9 +193,15 @@ int mca_base_framework_close (struct mca_base_framework_t *framework) {
return ret;
}
} else {
opal_list_item_t *item;
while (NULL != (item = opal_list_remove_first (&framework->framework_components))) {
OBJ_RELEASE(item);
}
ret = OPAL_SUCCESS;
}
framework->framework_flags &= ~MCA_BASE_FRAMEWORK_FLAG_REGISTERED;
framework_close_output (framework);
return ret;

View File

@ -1888,6 +1888,7 @@ int mca_base_var_dump(int index, char ***out, mca_base_var_dump_type_t output_ty
tmp = out[0][0];
if (VAR_IS_DEPRECATED(var[0])) {
asprintf (out[0], "%s, deprecated", tmp);
free (tmp);
tmp = out[0][0];
}

View File

@ -110,7 +110,7 @@ static int plm_alps_register(void)
MCA_BASE_VAR_SCOPE_READONLY,
&mca_plm_alps_component.priority);
mca_plm_alps_component.aprun_cmd = strdup ("aprun");
mca_plm_alps_component.aprun_cmd = "aprun";
(void) mca_base_component_var_register (comp, "aprun", "Command to run instead of aprun",
MCA_BASE_VAR_TYPE_STRING, NULL, 0, 0,
OPAL_INFO_LVL_9,

View File

@ -519,7 +519,7 @@ int orte_register_params(void)
#endif
/* allow specification of the launch agent */
orte_launch_agent = strdup ("orted");
orte_launch_agent = "orted";
(void) mca_base_var_register ("orte", "orte", NULL, "launch_agent",
"Command used to start processes on remote nodes (default: orted)",
MCA_BASE_VAR_TYPE_STRING, NULL, 0, 0,