1
1
openmpi/test/runtime/orte_init_finalize.c
2006-02-12 19:51:24 +00:00

55 строки
1.5 KiB
C

/*
* Copyright (c) 2004-2005 The Trustees of Indiana University and Indiana
* University Research and Technology
* Corporation. All rights reserved.
* Copyright (c) 2004-2005 The University of Tennessee and The University
* of Tennessee Research Foundation. All rights
* reserved.
* Copyright (c) 2004-2005 High Performance Computing Center Stuttgart,
* University of Stuttgart. All rights reserved.
* Copyright (c) 2004-2005 The Regents of the University of California.
* All rights reserved.
* $COPYRIGHT$
*
* Additional copyrights may follow
*
* $HEADER$
*/
#include "orte_config.h"
#include "orte/orte_constants.h"
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#ifdef HAVE_SYS_PARAM_H
#include <sys/param.h>
#endif
#ifdef HAVE_NETINET_IN_H
#include <netinet/in.h>
#endif
#include "orte/runtime/runtime.h"
int main (int argc, char* argv[])
{
int rc;
fprintf(stderr, "initialize the system\n");
if (ORTE_SUCCESS != (rc = orte_init(true))) {
fprintf(stderr, "couldn't complete init - error code %d\n", rc);
exit(1);
}
fprintf(stderr, "shut system down\n");
if (ORTE_SUCCESS != (rc = orte_finalize())) {
fprintf(stderr, "couldn't complete finalize - error code %d\n", rc);
exit(1);
}
fprintf(stderr, "orte_init_finalize: successful\n");
return rc;
}