if(ret!=MPI_SUCCESS){
smpi_datatype_unuse(*new_t);
*new_t=MPI_DATATYPE_NULL;
+ xbt_dict_cursor_free(&cursor);
return ret;
}
if(flag)
if(elem && elem->delete_fn)
elem->delete_fn(*type,*key, value, &flag);
}
+ xbt_dict_free(&(*type)->attributes);
}
if ((*type)->sizeof_substruct != 0){