Just some cleanup in case of error
This commit was SVN r25387.
Этот коммит содержится в:
родитель
7fa5f82d70
Коммит
21d45b0807
@ -77,12 +77,14 @@ int opal_hwloc_unpack(opal_buffer_t *buffer, void *dest,
|
|||||||
if (0 != hwloc_topology_set_flags(t, HWLOC_TOPOLOGY_FLAG_IS_THISSYSTEM)) {
|
if (0 != hwloc_topology_set_flags(t, HWLOC_TOPOLOGY_FLAG_IS_THISSYSTEM)) {
|
||||||
free(xmlbuffer);
|
free(xmlbuffer);
|
||||||
rc = OPAL_ERROR;
|
rc = OPAL_ERROR;
|
||||||
|
hwloc_topology_destroy(t);
|
||||||
goto cleanup;
|
goto cleanup;
|
||||||
}
|
}
|
||||||
/* now load the topology */
|
/* now load the topology */
|
||||||
if (0 != hwloc_topology_load(t)) {
|
if (0 != hwloc_topology_load(t)) {
|
||||||
free(xmlbuffer);
|
free(xmlbuffer);
|
||||||
rc = OPAL_ERROR;
|
rc = OPAL_ERROR;
|
||||||
|
hwloc_topology_destroy(t);
|
||||||
goto cleanup;
|
goto cleanup;
|
||||||
}
|
}
|
||||||
if (NULL != xmlbuffer) {
|
if (NULL != xmlbuffer) {
|
||||||
|
Загрузка…
x
Ссылка в новой задаче
Block a user