Exemple #1
0
/*---------------------------------------------------------------------------*/
na_return_t
NA_Test_finalize(na_class_t *na_class)
{
    na_return_t ret;
    unsigned int i;

    ret = NA_Finalize(na_class);
    if (ret != NA_SUCCESS) {
        fprintf(stderr, "Could not finalize NA interface\n");
        goto done;
    }

    if (na_addr_table_size && na_addr_table) {
        for (i = 0; i < na_addr_table_size; i++) {
            free(na_addr_table[i]);
        }
        free(na_addr_table);
        na_addr_table = NULL;
        na_addr_table_size = 0;
    }

#ifdef MERCURY_HAS_PARALLEL_TESTING
    na_test_mpi_finalize();
#endif

done:
     return ret;
}
Exemple #2
0
/*---------------------------------------------------------------------------*/
na_return_t
NA_Test_finalize(struct na_test_info *na_test_info)
{
    na_return_t ret;

    ret = NA_Finalize(na_test_info->na_class);
    if (ret != NA_SUCCESS) {
        NA_LOG_ERROR("Could not finalize NA interface");
        goto done;
    }
    free(na_test_info->target_name);
    free(na_test_info->comm);
    free(na_test_info->protocol);
    free(na_test_info->hostname);
    free(na_test_info->key);

#ifdef MERCURY_HAS_PARALLEL_TESTING
    na_test_mpi_finalize(na_test_info);
#endif

done:
     return ret;
}