Blame test/mpi/init/library_version.c

Packit 0848f5
/* -*- Mode: C; c-basic-offset:4 ; indent-tabs-mode:nil ; -*- */
Packit 0848f5
/*
Packit 0848f5
 *
Packit 0848f5
 *  (C) 2012 by Argonne National Laboratory.
Packit 0848f5
 *      See COPYRIGHT in top-level directory.
Packit 0848f5
 */
Packit 0848f5
#include "mpi.h"
Packit 0848f5
#include <stdio.h>
Packit 0848f5
#include "mpitest.h"
Packit 0848f5
Packit 0848f5
static int verbose = 0;
Packit 0848f5
Packit 0848f5
int main(int argc, char *argv[])
Packit 0848f5
{
Packit 0848f5
    int errs = 0, resultlen = -1;
Packit 0848f5
    char version[MPI_MAX_LIBRARY_VERSION_STRING];
Packit 0848f5
Packit 0848f5
    MTest_Init(&argc, &argv);
Packit 0848f5
Packit 0848f5
    MPI_Get_library_version(version, &resultlen);
Packit 0848f5
    if (resultlen < 0) {
Packit 0848f5
        errs++;
Packit 0848f5
        printf("Resultlen is %d\n", resultlen);
Packit 0848f5
    }
Packit 0848f5
    else {
Packit 0848f5
        if (verbose)
Packit 0848f5
            printf("%s\n", version);
Packit 0848f5
    }
Packit 0848f5
Packit 0848f5
    MTest_Finalize(errs);
Packit 0848f5
    MPI_Finalize();
Packit 0848f5
    return 0;
Packit 0848f5
Packit 0848f5
}